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1.0 GENERAL PROGRAM CONSIDERATIONS 

1.1 PROGRAM ABSTRACT 

CZDHUBO IS PART OF' THE DHU-li FUNCTIONAL VERIFICATION TEST. 
THIS PART OF THE TEST PERFORMS TESTS ON THE MODEM CONTROl 
SIGNALS OF THE OUT. 

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE 
THE INTERFACE TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. 
THIS PROGRAM CAN BE USED WITH XXDP», ACT, APT, SLIDE AND PAPER 
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER 
TO THE XXDP* USER'S MANUAL. THERE IS A BRIEF DESCRIPTION OF 
THE RUNTIME SERVICES IN THE OPERATING INSTRUCTIONS -COMMANDS 
OF THIS DOCUMENT, 



l.<? SYSTEM REQUIREMENTS 

THF FOLLOWING HARDWARE IS REQUIRED TO RUN THE DHU11 t'VT* 

UNIBUS PROCESSOR WITH AT LEAST 3*?K BYTES OF MEMORY , 

DHU BOARDS INSTALLED UN THE UNIBUS. 

APPROPRIATE PROGRAM LOAD DEVICE SUPPORTING XXDP* 
MEDIA OR A DOWN LINE LOADING SYSTEM. 

1.5 RELATED DOCUMENTS AND STANDARDS 

XXDP* USER'S MANUAL OF SCR IRES THE RUNNING OF DIAGNOSTICS 
UNDER THF XXDP* MONITOR. 

1.4 DIAGNOSTIC HlhfiARO PREREQUISITES 

THE PROCESSOR. THE L^IBUS, THt Si^TtM MlMUHi, The OJNsQLl URMlNAi 
AND THE LOAD MEDIA APf. ASSUMED TO HAVE BEiiN TESTED ANU FOUND WORKING 
BEFORE THIS PROGRAM IS RUN, 
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2.0 OPERATING INSTRUCTION! 



THIS SECTION 
FOR DETAILED 



CONTAINS A BRIEF DESCRIPTION OK 
INFORMATION, REFER TO THE XXDP* 



THE. RUNTIME SERVICES. 
USER'S' MANUAL (CHQUS), 



^,1 COMMANDS 



THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
(SUPERVISOR). THIS SECTION LIS1S THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP* USER'S MANUAL HAS MORE DETAILS. 



COMMAND 

START 

RESTART 

CONTINUE 

PROCEED 

EXIT 

ADD 

DROP 
PRINT 



DISPLAY 
FLAGS 

/FLAGS 



EFFFCT 



START THE DIAGNOSTIC FROM AN INITIAL STATE 
START THE DIAGNOSTIC WITHOUT INITIALIZING 
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER *C) 
CONTINUE rROM AN ERROR HALT 

RETURN TC XXDP^ MONITOR (XXOP» OPERATION ONLY!) 
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE 
CONSIDERED TO BF ACTIVE AT START TIME 
DEACTIVATE A UNIT 

PRINT STATISTICAL INFORMATION C IF IMPLEMENTED 
BY THE DIAGNOSTIC - SEE PERFOMANCE AND PROGRESS 
REPORTS SECTION 0' THIS DOCUMENT) 
TYPE A LIS1 OF ALL DEVICE INFORMATION 



TYPE THE STATE OF ALL FLAGS (SEE FLAGS 
CLEAR ALL FLAGS (SEE FLAGS SECTION) 



.ECTION) 



A COMMANO C^M BE RECOGNIZED Bi THE F I«S1 
lOUMAY, FOm EXAMPLE, TYPF "STA" INSTEAD 
MORE. INFORMATION CAN BE FOUND WITHIN THE 
EXTENDED COMMAND SYNTAX 



THRF E CHARACTERS 
Of "STAHT '. 
SECTION LABELLED 



SO 
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£>,? SWITCHES 



THERE ARE SEVERAL SWITCHES WHI ;H ARE USED TO MODIFY SUPERVISOR OPERATION, 
THESE SUITCHES ARE APPENDED TC THE LEGAL COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A HRIt^ DESCRIPTION OF EACH. 
IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED By "DDDDD". 

SWITCH EFFECT 

/TESTS:LIST 

/PASS; DDDDD 
/FLAGS; FIGS 

/EOPt DDDDD 

/UNITS;LIST 

EXAMPLE OF SWITCH USAGE: 



EXECUTE ONLY THOSE TESTS SPECIFIED IN 
THE LIST. LIST IS A STRING OF TEST 
NUMBERS, FOR EXAMPLE - /TESTS: 1 : 5: 7 10, 
THIS LIST WILL CAU5E TESTS 1,5.7,8,9,10 TO 
BE RUN, ALL OTHER TESTS WILL NOT BE RUN, 
EXECUTE DDODD PASSES (DPHOD • 1 TO 64000) 
SET SPECIFIED FLAGS. SEE i HE FLAGS SECTION 
OF THIS OOCUMENT, 

MESSAGE AFTER EVERY 

(DDDDD * 1 TO 64000) 
THOSE UNITS SPECIFIED 
EXAMPLE /UNITS:0:5:10 



REPORT END OF PASS 
DDDDO PASSES ONLY. 
TEST/ADD/DROP ONLY 
IN THE LIST. LIST 



I. 



USE UNITS 0,5,10.11, 12 (UNIT NUMBERS • O-bJ) 



START/TESTS: 1 -5/PASS: 1000/EOP: 100 

THE EFFECT OF THIS COMMAND WILL Be : 1) TESTS 1 THROUGH S 
EXFT' fED, c>) ALl UNITS Will TESTED 1000 TIMES AND 3) THE 
K^SS MESSAGES WlLl BE PRINTED AFTER EACH 100 PASSES ONI Y 
SWITCH CAN BE RECOGNIZED BY THE URST THREE CHARACTERS. 
FOR EXAMPLE, TYPE "/TES:l-5" INSTEAD OF "/TESTS:! V. 



Will 


HE 


END 


OF 


A 




YOU 


MAY 



BELOW IS 
COMMAND. 



A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED By EACH 



TESTS 



PASS 



FLAGS 



START 

Re START 

CONTINUE. 

PROCEED 

D90P 

ADD 

PRINT 

DISPLAY 

f LAG', 

/F I AGS 

EXIT 



tOP 

X 
:» 
X 



k^ITS 
X 



HI 
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,2.3 FLAGS 



FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR, ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SUITCH. FLAGS 
ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE /FLAGS COMMAND MAY Al SO BE USED TO CLEAR 
ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS 
NO COMMANDS AFFECT THE STATE Of THE FLAGSj THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH, 

FLAG EFFECT 



HOE HALT ON ERROR CONTROL IS RETURNED TO 

RUNiIMC SERVICES COMMAND MODE 
l.OI LOOP ON ERROR 

IER* INHIBIT ALL ERROR REPORTS 

IBR* INHIBIT ALL ERROR REPORTS EXCEPT 

FIRST LEVEL (FIRST LEVEL CONTAIN 1 . 

FRROR TYPE, NUMBER, PC, TEST AND UNIT) 
IXR* INHIBIT EXTENOED ERROR REPORTS (THOSE 

CALLED BY PRINTX MACRO'S) 
PR1 DIRECT MESSAGES TO LINE PRINTER 

PNI PRINT TEST NUMBER AS TEST EXECUTES 

HOF "BELL" ON ERROR 

UAM UNAT T ENOED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 

APPLY TO DIAGNOS r ICS WHICH DO NOT SUPPORT 

STATISTICAL REPORTING) 
IDR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTOOROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 

HAVE EVALUATION SUPPORT) 

♦ SEF THE ERROR INFORMATION SECTION OF THIS DOCUMENT 

SEt THE XXOP* USER'S MANUAL FOR MORE DF TARS ON FLAGS. tOU MAt 
SPECIFY MORE THAN ONE f I AG WITH THf HAG SWITCH, f OR EXAMPI E , 
TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT FRROR REPORTS 
KND TYPE A "BELl " ON FRROR, YOU MAt USE THE FOLLOWING STRING: 

/FlAGSsLGtiltRieoe 
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2,4 EXTENDED COMMAND SYNTAX 



2.4.1 START COMMAND 

**************************«**+***************************** 

STA(RT)/TESTS:<TEST L 1ST >/PASS : <PASS-CNT>/Fl AGS; 
<FLAG LIST>/EOP:<INCR> 

*********************************************************** 



2.4.1,1 TESTS SWITCH ( /TESTS :< TEST -LIST > ) 



OF 
THE 



<TEST-LIST> IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC) OR 
DECIMAL NUMBERS '1-5:8-10 ETC.), SEPERATED BY COLONS. THAT SPECIFY 
TESTS TO BE EXECUTED . TESTS WILL BE EXECUTED IN NUMERICAL ORDER 
OF THE ORDER OF SPECIFICATION. THE DEFAULT IS TO EXECUTE 
ALL TESTS, ON THIS AND ALL SWITCHES. THE ANGLE BRACKETS <> ARE 
PUNCTUATION USED IN THE DEFINITION ONLY, AND ARE NOT TO BE TYPED BY 
THE OPERATOR. SEE EXAMPLE AT END OF "EFFECT OF START COMMAND" 
SECTION. 



2.4.1.2 PASS SWITCH C /PASS: <PASS CNT> ) 

<PASS-CNT> IS A DECIMAL NUMBER INDICATING THE DESIRED NUMBER OF 
PASSES. A PASS IS DEFINED AS THE EXECUTION OF THE FULL DIAGNOSTIC 
CALL SELECTED TESTS). THE DEFAULT IS NON-ENDING EXECUTION. IN THIS 
CASE, EXIT FROM THE PROGRAM IS ACCOMPl ISHfD EITHER Bl TYPING A 
CONTROL/C OR BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG 
BEING SET. THE EXIT IS A RETURN TO COMMAND MODE, SEE EXAMPLE AT END 
OF "EFFECT OF START COMMAND" SECTION. 



2.4.1.3 FLAGS SWITCH ( /FLAGS : <FLAG-LI5T » ) 



<FLAG-LIST> IS A 
<FlAG-l>, OR <FLAG-0> 
THL FOLLOWING VALUES: 



SEQUENCE OF ElfMFNTS 
SEPARATED BY COLONS, 



OF THE FORM »HAii', 
WHERE <FLAG> HAS ONE OF 



HD\ HALT ON FRROT, CAUSING COMMAND MODE TO 

BE ENTERED WHEN AN ERROR IS ENCOUNTfc HHJ . 

LOL LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO 
LOOP CONTINUOUSLY WITHIN THE. SMAll.lST 
DEFINED BLOCK OF CODING (SEGMENT. SUBTEST, 
OR TEST) CONTAINING THE ERROR. 

IER INHIBIT ERROR REPORTING. 

IBC INHIB.T BASIC ERROR REPORTS. 

IXE INHIBIT EXTENOriD ERROR REPORTS. 

PRI D1HLLI ALL MESSAGES TO A LINE PRINTER. 

PNT PRINT NUMSER OF TEST BEING EXECUTED. 

BOE BEl L ON ERROR (NOT RFi ATED TO BELL PROMPTING) 

UAM PUN !N UNATTENDED MODI . Br PASSING MANUAL 

TNTERVENTI'JN (ILltGAl FOR THIS DIAGNOSTIC ) . 

ISR INHIBIT V.'ATISTICAL REPORTS. 
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inu 



UNITS BY DIAGNOSTIC 
US DIAGNOSTIC, ) 



INHIBIT DROPPING OF" 

(HAS NO EFFECT IN T 
LOT LOOP ON TEST. 
THE FLAGS NAMED OR EQUATED TO 1 ARE SET, THOSE EQUATED TO 
CLEARED, A FLAG NOT SPECIFIED IS CLEARED, IF THE FLAGS SWITCH 
GIVEN ALL FLAGS ARE CLEARED, SEE EXAMPLE AT END OF "EFFECT OF 
COMMAND" SECTION. 



ARE 

IS NOT 

START 



SEQ 9 



2.4.1,4 END OF PASS SWITCH C/E0P:<INCRO 



<INCR> IS A DECIMAL 
PASSES) IT IS DESIRED 
DEFAULT IS AT THE END OF 
START COMMAND" SECTION. 



NUMBER INDICATING HOW OFTEN (IN TERMS OF 
THAT THE END OF PASS MESSAGE BE PRINTED, THE 
EVERY PASS. SEE EXAMPLE A T END OF "EFFECT OF 



2.4, l.b EFFECT OF START COMMAND - 

THE EFFECT OF THE START COMMAND IS TO INITIATE THE HARDWARt 
PARAMETER DIALOGUE, THE SOFTWARE PARAMETER DIALOGUE, THE 
INITIALIZATION QUESTIONS, AND THEN THE DIAGNOSTIC COMMENCES TESTING. 

THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION "0 
UNITS (D) ?" TO WHICH THE OPERATOR SHOULD REPLY WITH THE NUMBER OF 
UNITS TO BE TESTED, FOLLOWING THIS ARE THE QUESTIONS WHEREBY THE 
P- TABLES THEMSELVES ARE BUILT. EACH P TABLE IS A CORE -RESIDENT TABLF 
CONTAINING ALL THE HARDWARE INFORMATION FOR ONE COMPLETE UNIT, EACH 
QUESTION IS FOLLOWED BY THE RESPONSE RADIX (D FOR DECIMAL. B FOR 
BINARY, FOR OCTAL, L FOR YES 'NO) IN PARENTHESES AND THf DEFAUl T 
VALUE AFTER THE PARENTHESES FOR THE ACTUAL HARDWARE P TABLE 
QUESTIONS SEE THE "HARDWARE PARAMETERS" SECTION. 

FOLLOWING THE HARDWARE QUESTIONS ARE THfc SJFTWARt QUESTIONS TO 
BUILD THE SOFTWARE TABLES. WHICH OFF IN* OPt RATING PARAMETERS Of T Ht 
DIAGNOSTIC PROGRAM, THESE QUESTIONS ARE DESCRIBED IN THE "SOFTWARE 
PARAMETERS" SECTION. 

EXAMPLE: 

STA/TESTS : 1 : 3 -4 : /PASS : 3/FLAGS : IER : HOE * 1 



THIS COMMAND WILL CAUSE THREE PAsSt S TO HI MADE, WITH EACH PASS 
CONSISTING OF TESTS 1.3, AND 4, THfRt Is NO DUURENCE BETWEEN SAWNG 
<FLAG> AND SAY ING <FlAG-l>. IHt NOTATION « H AG • • IS MEANINGMA ONI i 
ON A COMMAND OTHER THAN START TO CLEAR A > I At, THAI WAS PREVIOUS t .,^T . 
NOTE THAT ON ALL CQMMAND5 ONLY THE FIRST THREE LETTERS ARE SCANNED* 
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SEQ 10 



"* , 4 , ^ 



i..^.,_ RESTART COMMAND - 

RES( TART )/ TESTS :< TEST -L 1ST > /PASS :< PASS -CNT» /FLAGS: 
<FLAG-LIST>/UNITS:<UNIT-LIST> 

+ + + + **. + + + ** + **,* + + + + + + + ** + + ** + + *i********* + ** + ************* + 



P.4.2.1 TESTS, PASS, AND FLAGS SWITCHES - 

<TEST-LIST>, <PASS-CNT>, AND <FLAG-UST> 

COMMAND. 



ARE AS IN THE START 



2.4. P.? UNITS SUITCH (/UNITS: <UNIT -LISTO - <UNIT-LIST> IS A SEQUENCE 
OF DECIMAL NUMBERS (0.1 ETC.) OR RANGES OF DECIMAL NUMEERS (0-5, 6-10 
ETC.) THAT SPECIFY THE UNITS TO BE TESTED. THE NUMBERS ARE. SEPARATED 
BY COLONS, THE NUMBERS MAY RAN^ FROM THRU N-l (N IS THfc NUMBER OF 
UNITS SPECIFIED IN THE PREVIOUS START COrtHANO), THE NUMBER IMUCATES 
THE POSITION OF THE P-TABLE AS THE DATA WAS ENTERED DUPING THE 
HARDWARE DIAGLOGUE . THE UNITS WHICH ARE SELECTED MUST NOT HAVE BEEN 
DROPPED BY THE DROP COMMAND. SEE THE DISCUSSION OF ADD AND DROP 
COMMANDS BELOW. DEFAULT IS TO TEST ALL UNITS WHICH HAVE NOT BEEN 
DROPPED BY A DROP COMMAND. 



2.4.?. 3 EFFECT OF RESTART COMMAND 

THE RESTART COMMAND DIFFERS FROM THE START COMMAND IN THAT THE 
P TABLES FROM THE PREVIOUS START COMMAND (THERE MUST HAVE BEEN ONE) 
ARE USED, INSTEAD OF NEW ONES BEING DUP..T. THE UNITS SUITCH SHOULD 
NOT QC USED WITH THIS PROGRAM. THE SOFTWARE DIALOGUE MA* OPTIONALLY 
BE REEXECUTED (OPERATOR WILL BE ASKED). THE COMMAND CAN BE USED AKtR 
COMMAND MODE HAS BEEN REENTERED IN ANY 1)1' THE THREE NORMAL WAiS; A) 
THE REQUESTED NUMBER OF PASSES HAVE BUN MADE, B) AN ERROR WAS 
ENCOUNTERED WITH THE HALT ON ERROR FLAG SET, OR C) A CONTRUL/C WAS 
ENTERED BY THE OPERATOR. 



?.4.3 CON T INUE COMMAND 

************************************ **************** ********** 

CONC 1INUE) /PASS :< PASS -CNT/FL AGS r<f I AG L IST^ 

♦ ♦♦♦♦♦♦***4n**4**4****U*****i + **** + 44UM**** + »* + *»**t*** 



2.4.3.1 FLAG SUITCH ( /FLAG'.; : * FLAG USTO 

<FIAG L£ST> IS SAME AS IN IHt. START COMMAND, HUT UNSPECIFIED 
FLAGS RETAIN THETR CURRENT VALUE. 
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,4.3.2 EFFECT OF CONTINUE COMMAND 



CONTINUE MUST FOLLOW A START OR RESTART, AND COMMAND MODE MUST 
HAVE BEEN ENTERED DUE TO A HALT ON tRROR OR A CONTROL/C. THE EFFECT 
OF THE COMMAND IS TO GO TO THE BEGINNING OF TME iEST THAT WAS BEING 
EXECUTED WHEN THE HALT OR CONTROL/C TCOK PLACE. SOFTWARE DIALOGUE MAY 
OPTIONALLY BE REEXECUTED. HARDWARE PARAMETERS MAY NOT BE CHANGED, 



2. 4. 4 PROCEED COMMAND - 

***+*++*+***+**♦**********++*+*++*+******♦***#*♦ v ********** 

PR0(CEED)/FLAGS:<FLAG-LIST> 



2.4,4.1 FLAGS SWITCH ( /FLAGS: <FLAG-LIST > ) - 

<FLAG-LIST> IS AS IN THE START COMMAND, BUT UNSPECIFIED FLAGS 
RETAIN "HEIR CURRENT VALUE. 



2.4.4.2 EFFECT OF PROCEED COMMAND - 

PROCEED MUST FOLLOW A START, RESTART, OR CONTINUE. COMMAND MODE 
MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT OF THE COMMAND 
IS TO BEGIN EXECUTION AT THE LOCATION FOLLOWING THE ERROR CALL. 
NEITHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED. 



2.4.5 ADD COMMAND - 

****************** ***,**** * .< ■ +♦*♦♦**♦♦♦♦♦*♦ + ♦* + ♦♦*♦♦♦♦*♦♦*« 

ADD/UNITS: < UNIT -LIST > 

** + **********.***,** + *********************** + **************** 



2.4.6 FFFECT OF ADD COMMAND 

THE UNITS SPECIFIED ARE ADDED TO THE TEST SEQUENCE, EACH 

UNIT MUST HAVE A P- TABLE IN MEMORY DUE TO AN EARLIER 
HARDWARE DIALOGUE. THIS COMMAND MUST BE f 01 1 OWED By A 

RESTART OR CONTINUE. THE UNITS SWITCH MUST BE SPECIFIED. 

THE ADD COMMAND 13 MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 



2,4.7 DROP COMMAND 

♦♦A******************************************************** 

DROCP)/UNITS:<UNIT LIST > 

* + + *** + + + ***.** + * + ************ + + + ** + ** + **♦*****♦*** + * + + ♦♦*** 
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2.4.8 EFFECT OF DROP COMMAND - 

THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING. THE UNITS 
*:;_» bE RESELEC T LD ONLY BY THE EXEH;TION OF AN ADD OR START 
COMMkNC. THE UNITS SWITCH MUST BE ENTERED, ^HIS COMMAND 
MUST IE FOLLOWED BY A RESTART OR A CONTINUE COMMAND. 

2.4.9 PRINT COMMAND - 

PRICNT) 

************** 4**** + ** + *** + ********************************* 

P. 4. 9.1 EFFECT OF PRINT COMMAND - 

THE TOTAL NUMBER OF ERRORS FOR EACH UNIT SINCE THE LAST 
START OR RESTART COMMAND ARE PRINTED. THE ISR (INHIBIT 
STATISTICAL REPORTING) FLAG IS CLEARED. 

2.4.10 DISPLAY COMMAND - 

*********************************************************** 

DISC PLAY VUNI TS :< UNIT -LI ST > 

****************** +**+*****+*+*****+****+*++***** *+****+++* 

2.4.10.1 EFFECT OF DISPLAY COMMAND - 

THE HARDWARE P- TABLE FOR THE TEST STATION IS PRINTED IN THE 
FORMAT IN WHICH IT WAS ENTERED. 

2.4.11 FLAGS COMMAND - 

«************************************«****t****+++t+ + **«.4+ + 

FLACGS) 

4*******************************************************41* 

2.4,11.1 EFFECT OF FLAGS COMMAND ■ 

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINICO. 



Nl 
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2.4,12 ZFLAGS COMMAND - 

+ * + * + + + ♦♦ + ** + ** + + + * + + ** + + + + ** + ♦ + * + *#♦**»*******♦♦***# + *<■■«** 

ZFLCAGS) 

** + * + + + + + + + + + + + + + + + + + + * + * + * + + + * + * + + + + + + + + + + + + + >«« + + + + + + + + + + *. 



0.4,13 ZFLAGS COMMAND - 

ALL FLAGS ARE CLEARED. 



2.4.14 CONTROL CHARACTERS - 

C A CONTROL/C CO ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES A RETURN TO COMMAND MODE, 

Z A CONTROL/Z (Z) ENTERED DURING ONE OF THE TWO 
OPERATOR DIALOGUES-- HARDWARE P- TABLE DIALOGUE OR 
SOrTWARE P-TAUIE DIALOGUE CAUSES THE DEFAULTS TO BE 
TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 

A CONTROL/0 (0) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES ALL TELETYPE OUTPUT TO BE 
SURPRESSED FOR THE REMAINDER OF THE DIAGNOSTIC OR 
UNTIL ANOTHER CONTROL/0 IS TYPED, WHICH RESTORES 
NORMAL TELETYPE OUTPUT. 



Be] 

C.'DHURO DHU-U KUNC TST PART3 MACRO M1200 15-MAR-84 09:41 PAGE 15 c^cn 14 

PROGRAM DOCUMENT 

2*5 HARDWARE QUESTIONS 

WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPING "CHANGE HW (L) ?" 
YOU MUST ANSWER "Y" AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN "PRELOADED" USING THE SETUP UTILITY (SEE 
CHAPTER 6 OF THE XXDP* USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A "Y", THE RETIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS (IN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 

1. CSR ADDRESS - THIS QUESTION REQUESTES THE CSR ADDRESS OF THE 
SPECIFIED DHU-11. THE DEFAULT ANSWER FOR THIS QUESTION IS 
ADDRESS 160460 (OCTAL). 

2. ACTIVE LINES BIT MAP - THIS QUESTION REQUESTS AN OCTAL BIT 
MA'-' OF THE SERIAL COMMUNICATION LINES ON THE DHU11 WHICH ARE 
BEING SELECTED FOR TESTING. IF THE BIT IN THE BIT MAP IS SET 
WHICH CORRESPONDS TO A PARTICULAR LINE ( I.E. BIT r > FOR LINE 
5 ) THAT LINE WILL BE TESTED BY THE FVT. THE DEFAULT ANSWER 
FOR THIS QUESTION IS ALL LINES I.E. 177777, 

3. TYPE OF LOOPBACK (1-INTERNAL, 2-H3029 OR H5277, 3-H325) 
THIS QUESTION REQUESTS THE TYPE OF LOOPBACK TO BE USED WHEN 
TESTING THE DHU-11. 

THE FOLLOWING TYPES ARE SUPPORTED: 

INTERNAL - ONLY INTERNAL UART LOOPBACK IS TO BE USED IN 
TESTING THE DHU-11. SINCE ALL THE TESTS IN THIS PART 
REQUIRE EITHER STAGGERED OP SINGLE LINE LOOPBACK, SPECIF ING 
INTERNAL LOOPBACK WILL CAUSE THE TESTS TO BE SKIPPED, THIS 
WILL NOT HOWEVER CAUSE ANY ERRORS TO BE REPORTED. 

H3029 OR H3277 - STAGGERED LOOPBACK CONNECTORS ARE PROVIDED 
ON THE DHUU DISTRIBUTION PANEL (H3029) IF THIS DISTRIBUTION 
PANEL IS NOT PRESENT THEN H3?77 STAGGERED Bfc'RG CONNFCTOR(S) 
MUST BE INSTALLED ON THE BERG CONNECTOR SOCKETS OF THt DHUU. 

H3P5 SINGLf I INF, 25 PIN LOOPBACK CONNECTORS (TtPE H325) 
ARE INSTALLED ON THE LINES TO BE TESTED. 



C, : 
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^.b SOFTWARE QUESTIONS 

AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 

^R CONTINUE COMMAND, THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 

PmRAMETERS. THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 

OPERATION MODES, YOU WILL BE PROMPTED Br "CHANGE SW (L) ?" 

IF YOU WISH TO CHANGE ANY PARAMETERS, ANSWER By TAPING 

"V. THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 

IN THE NEXT PARAGRAPHS), 

1. REPORT LWIT NWBER AS EACH UNIT IS TESTED - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD REPORT THE NUMBER OF THE UNIT WHICH 
IT IS TESTING AS IT BEGINS TO TEST THAT UNIT. 

c?. EXTENDED ERROR REPORTING - THIS QUESTION ASKS WHETHER EXTENDED 
ERROR INFORMATION IS REQUIRED OTHER THAN THE "TEST FAILED" 
MESSAGE. ON EACH ERROR REPORTED. THE DEFAULT IS "NO" I.E. ONLY 
A MESSAGE REPORTING THE FACT 1HAT THE 1£ST FAILED WILL BE 
PRINTED. 

3* NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE THIS 
QUESTION IS ASKED ONLY IF THE PREVIOUS QUESTION WAS ANSWERED 
"YES". THE QUESTION ASKS FOR THE NUMBER OF DATA ERRORS WHICH 
SHOULD BE REPORTED INOIVIDUALLY BY THIS PROGRAM FOR EACH LINE 
FOR EACH TRANSMISSION TEST. ERRORS WHICH ARE NOT REPORTED 
INDIVIDUALLY ARE REPORTED IN SUMMARY £RRQR REPORTS, 
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2,7 EXTENDED P- TABLE DIALOGUE 

WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES 
IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH 
UNIT TO BE TESTED. IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS 
A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL LINES. THIS BECOMES TEDIOUS SINCE MOST OF 
THF ANSWERS ARE REPETITIOUS. 

TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING 
A FICTIONAL DEVICE, THE XYll. SUPPOSE THIS DEVICE CONSISTS OF 
A CONTROL MODULE WITH EIGHT UNITS C SUB DEVICES ) ATTACHED TO IT. 
THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS THROUGH 7. THERE 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE 
Q FACTOR, THIS Q-FACTOR MAY BE OR 1 . BELOW IS A SIMPLE WAY 
TO BUILD A TABLE FOR ONE XYll WITH EIGHT UNITS. 

UNITS CD) ? 8<CR> 

UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE CO) ? 0<CR» 
Q-FACTOR (0) ? 1<CR> 

UNIT 2 

CSR ADDRESS CO) ? 160000<CR* 
SUB-DEVICE CO) ? 1<CR> 
Q-FACTOR CO) 1 ? 0<CR^ 

UNIT * 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE CO) ? 2<CR> 
Q-FACTOR CO) ? <CR> 

UNIT 4 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE CO) ? 5<CR> 
Q-FACTOR (0) ? <CR> 

UNIT 5 

CSR ADDRESS CO) ? 160000<CR> 
SUB DEVICE CO) ? 4<CR> 
Q-FACTOR CO) ? <CR* 

LNIT 6 

CSR ADDRESS CO) > 1 60000 <CR> 
SUB -DEVICE CO) ? r xCR> 
Q-FACTOR CO) ? <CR> 

UNCT / 

CSR ADDRFSS CO) ? 160000<CR* 

SUB -Dt VICE o (Q) V 6<CR> 
U-FACTUR CO) O ? 1<CR> 
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UNIT 8 

CSR ADDRESS (0) 160000<CR> 

SUB-DEVICE CO) ? 7<CR> 
0-FACTOR (0) 1 ? <CR> 

NOTICE THAT THE DEFAULT VALUE FOR THE Q -FACTOR CHANGES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 

AS YOU CAN SEE FROM THE ABOVE EXAMPLE, THE HARDWARE PARAMETERS 

DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 

NOT VERY EFFICIENT. 

THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER. 
LET'S BUILD THE SAME TABLE USING THE MULTIPLE SPECIFICATION 
FEATURE. 

O UNITS (D) ? 8<CR> 

UNIT 1 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE (0) ? 0,1<CR> 
Q-FACTOR (0) ? 1.0<CR* 

UNIT 3 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE CO) ? 2-5<CR> 
Q-FACTOR (0) ? 0<CR> 

UNIT 7 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE 9 CO) ? 6,7<CR> 
Q-FACTOR (0) ? 1<CR> 

AS YOU CAN SEE IN THE ABOVE DIALOGUE., THE RUNUME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRST PASS, TWO ENTRIES 
ARE BUILT SINCE TWO SUB-DEVICES AND Q-FACTORS WERE SPECIFIEO. THE 
SERVICES ASSU1E THAT THE CSR ADDRESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS, FOUR ENTRIES WERE 
BUILT. THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED, THE 
"-" CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA 
FROM THE FIRST NUMBER TO THE SECOND. IN THIS CASE, SUB-DEVICES 
2. 3, 4 AND 5 WERE SPECIFIED. (IF THE SUB -DEVICE WERE SPECIF l'j.0 
BY ADDRESSES, THE INCREMENT WOULD RF BY 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q FACTORS FOR 
THE FOUR ENTRIES ARE ASSUMED TO Bfr 160000 AND RESPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 

THE WHOLE PROCESS COULD HAVE REEN ACCOMPLISHED IN ONE PASS AS 

SHOWN BELOW. 

UNITS CD) ? d<CR> 
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UNIT 1 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE O CO) ? 7<CR> 
Q-FACTOR (0) ? O, 1 ,0, , , , 1 , 1<CR> 

AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES C COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY. 



2.8 QUICK START-UP PROCEDURE (XXDPO 
TO START UP THIS PROGRAM} 

1. BOOT XXDP» 

2. GIVE THE DATE AND ANSWER THE LSI/UNIBUS AND 50HZ (IF THERE 
IS A CLOCK) QUESTIONS. NOTE, NOT ALL VERSIONS OF XXDP* ASK 
FOR THE CLOCK FREQUENCY 

3. TYPE "R NAME". WHERE NAME IS THE NAME OF THE 8IN OR 
BIC FILE FOR THIS PROGRAM 

4. TYPE "START" 

r >. ANSUER THE "CHANGE HW" QUESTION WITH »Y" 

6. ANSWER ALL THE HARDWARE QUESTIONS 

? % ANSWER THE "CHANGE SW" QUESTION WITH "N" 

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THt 

DF.FAUl TS FOR FLAGS AND SOFTWARE PARAMETERS, I- OR Dt'FAUl T INFORMATION 

SEE THfc SECTIONS WITHIN THIS DOCUMENT ON FLAGS ♦ AND HARDWARE UUESTIUNS 
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3.0 ERROR INFORMATION 

3.1 TYPES OF ERROR MESSAGES 

THERE ARE THREE LE.VELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 
A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE "IER" FLAG IS SET (SEE THE FLAGS SECTION 
OF THIS DOCUMENT). 

THE GENERAL ERROR MESSAGE IS OF THE FORM: 



NAME TYPE NUMBER 
ERROR MESSAGE 



ON UNIT NUMBER TST NUMBER PCsXXXXXX 



, WHERE ; 



NAME - DIAGNOSTIC NAME 

TYPE - ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 

NUMBER - ERROR NUMBER 

UNIT NUMBER - - N (N IS LAST UNIT IN PTABLE) 

TST NUMBER - TEST AND SUBTEST WHERE ERROR OCCURRED 

PCrXXXXXX « ADDRESS OF ERROR MESSAGE CALL 



BASIC ERROR 
INFORMATION 



MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDI.iONAL 
ABOUT THE ERROR. THESE ARE ALWAYS PRINTFD UNLESS 



THE "IER" OR "IBR" FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 

DOCUMENT). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE 

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE: ARE ALWAYS 
PRINTED UNLESS THE "IER", "IBR" OR "IXR" FLAGS ARE SET (SEE THE 
FLAGS SECTION OF THIS DOCUMENT). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 



H?. 
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S.2 SPECIKIC ERROR MESSAGES 

THIS PROGRAM IS INTENDED TO PROVIDE A GO/NOGO INDICATION 
OF" THE FUNCTIONALITY OF THE DHU11 BOARDS. TO EXECUTE THE 
PROGRAM IN THIS MODE THE OPERATOR NEED ONLY ANSWER THE 
"EXTENDED ERROR REPORTING" SOFTWARE QUESTION WITH "NO", THE 
PROGRAM WILl THEN ONLY Pi: INT THE NAME OF THE FAILING TEST 
THE TEST AND ERROR NUMB; ;;S. FOR A LIST OF THE TEST NAMES 
IN THIS PROGRAM SEE THE TEST SUMMARIES SECTION OK THIS 
DOCUMENT, At,' EXAMPLE OF SUCH A AN ERROR MESSAGE IS THE 
FOLLOWING: 

CZDHW DVC FTL ERR 7802 ON UNIT 00 TST 002 SU8 000 PC: XXXXXX 
MODEM CONTROL DTR BIT TEST FAILED 

THIS ERROR INDICATES THAT A FATAL ERROR WAS ENCOUNTERED 
DURING THE TEST WHICH TESTS THE DATA TERMINAL READY CONTROL 
SIGNAL. 

IF THE OPERATOR HAD REQUESTED EXTENDED ERROR REPORTING THE 
SAME ER30R WOULD BE REPORTED AS FOLLOWS; 

C2DHW DVC FTL ERR 7802 ON UNIT 00 TST 002 SUB 000 PC} XXXXXX 
MODEM CONTROL DTR BIT TEST FAILED 
DTR BIT FAULTY ON LINE 4 DECIMAL. 



4.0 PERFORMANCE AND PROGRESS 

AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE 
TOTAL NUMBER OF ERRORS REPORIED SINCE THE DIAGNOSTIC WAS STARTED. 
THE "EOP" SWITCH CAN BE USED TO CONTROL HOW OMEN THE END 
OF PASS MESSAGE IS PRINTED. FOR FUTHER INFORMATION SEE THE 
SWITCHES SECTION OF THIS DOCUMENT, 
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SEQ 21 



5.0 TEST SUMMARIES 

THE FOLLOWING ARE INCLUDED WITHIN CZDHWB : 



1. DEVICE REGISTER ACCESS TEST - VERIFIES THAT THE UUT REGISTERS 
WILL RESPOND WITH THE CORRECT UNI8US HANDSHAKING SIGNALS. 
VERIFIES THAT THE UUT IS AT THE CORRECT ADDRESS. 

2. DTR TEST - VERIFIES THAT CHANGING THE STATE OF THE DTR BIT 
AFFECTS THE STATE OF THE DTR CONTROL LINE, 

3. RTS TEST - VERIFIES THAT CHANGING THE STATE OF THE RTS BIT 
AFFECTS THE STATE OF THE RTS CONTROL LINE. 

4. DSR TEST - VERIFIES THAT THE DSR STATUS SIGNAL CORRECTLY 
RFPORTS THE STATE OF THE LOOPED BACK DTR CONTROL LINE. 

5. RI TEST - VERIFIES THAT THE RI STATUS SIGNAL CORRECTLY 
REPORTS THE "TATE OF THE LOOPED BACK DTR CONTROL LINE. 

6. CTS TEST - VERIFIES THAT THE CTS STATUS SIGNAL CORRECTLY 
REPORTS THE STATE OF THE LOOPED BACK RTS CONTROL LINE. 

7. DCD TEST - VERIFIES THAT THE OCD STATUS SIGNAL CORRECTLY 
REPORTS THE STATE OF THE LOOPED BACK RTS CONTROL LINE. 

6. DTR INTERACTIONS TEST - VERIFIES THAT CHANGING THE STATE 
OF THE DTR CONTROL SIGNAL ON ANY LINE DOES NOT AFFECT THE 
STATE OF ANY STATUS SIGNALS THAT IT IS NOT LOOPED BACK TO. 

9. RIS INTERACTIONS TEST - VERIFIES THAT CHANGING THE STATE 
OF THE RTS CONTROL SIGNAL ON ANY LINE DOES NOT AFFECT THE 
STATE OF ANY STATUS SIGNALS THAT IT IS NOT LOOPED BACK TO. 

1Q< REPORT BMP CODES TEST THIS PStUOU TEST REPORTS THE F TRST 32 
CHARACTERS WHICH WERE DISCOVERED IN THE FIFO DURING THE 
EXECUTION OF THE OTHER TESTS. THIS AVOIDS INTERRUPTION 0( THE 
OTHER TES1S BY THESE CODES IF THEY ARE NOT CRITICAL TO THE 
PERFORMANCE OF THE TESTS* 
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6.0 EXAMPLE ERROR FREE PASS 

THE FOLLOWING IS AN EXAMPLE OF AN ERROR FREE PASS DIALOGUE: 

.R CZDHWBO 

CZDHWBO, BIN 

DRS 

CZDHW-B-0 

DHU-11 FUNC TST PARTS 

UNIT IS DHU-11 

RESTRT ADDRi 147670 

DR>STA/PAS:1 

CHANGE HW CD ? Y 

4 UNITS (D) ? 2 

UNIT 

CSR ADDRESS: CO) 160460 ? *Z 

UNIT 1 

CSR ADDRESS: (0) 16C460 ? 160500 

ACTIVE LINE BIT MAP: CO) 177777 ? <CR> 

TYPE OF LOOPBACK Cl-INTERNAL, 2-H3029 OR H3277, 3-H325): (0) 2 ? 

CHANGE SW CD ? Y 

REPORT UNIT NUMBER AS EACH UNIT IS TESTED: CD Y ? <CR> 

EXTENOED ERROR REPORTING: CD N ? Y 

NUMBER OF INDIVIDUAL DATA ERRORS TO R&PQRT ON A LXNk: (0) ? <CR> 

TFSTING 'NTT : 

TESTING UNIT : 1 

CZDHW EOP 1 
TOTAL ERRS 

QR> 



t 



1<2 



CZDHWBO 
PROGRAM 

1021 

1022 
1030 

1031 
1052 
1033 
1034 
1035 
10i6 
103V 
1036 
1039 
1040 
1041 
1042 
1043 
1044 
1045 
1046 
104? 
1048 
1049 
1050 
1051 
1052 
1053 
1054 
1055 
1056 
1057 
1058 
1059 
1060 
1061 
1062 
1063 
1064 
1065 
1066 
1083 
1084 
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DOCUMENT 



000000 



000000 



002000 



002000 



002000 
002000 
002000 
002001 
002002 
002003 
002004 
002005 
002006 
00200/ 
002010 
002010 
002011 
002011 
002012 
002012 
002014 
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.LIST SEQ,LOC,BIN,MEB 
.NLIST CND 



SEQ 23 



.SBTTL PROGRAM HEADER 



.MCALL SVC 

SVC 



} INITIALIZE SUPERVISOR MACROS 



;***************************************************^^ 

5 IF STRUCTURED MACROS ARE TO BE USED, ADD ".MCALL STRUCT" AND "STRUCT" 

j TO INITIALIZE THE STRUCTURED MACROS. 



000001 
000001 
000001 
000001 
000001 



SVCINS- 1 

SVCTST- 1 

SVCSU6- 1 

5VCGBL- 1 

SVCTAG- 1 



LIST INSTRUCTIONS, SHIFTED RIGHT 

LIST TEST TAGS, SHIFTFD RIGHT 

LIST SUBTEST TAGS, SHIFTED RIGHT 

LIST GLOBAL TAGS. SHIFTED RIGHT 

LIST OTHER TAGS, SHIFTED RIGHT 



CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 
TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 
SYMBOLS TO BE MINUS -ONE TO NOT LIST THE EXPANSIONS. YOU MAY 
CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 
********************************************************************************* 



002000 



.ENABL ABS 
i .ENABL AMA 



2000 



BGNMOD 



i THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
I THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 

i " " 

POINTER BGNRPT,BGNSW,BGNSrT.BGNOU,£RRTQL 
HEADER C2DMW«B # 0,IQ.0,PRIQ7 



103 
132 
104 

110 
12V 
000 
000 
000 

102 

060 

000000 



I. $ NAME 



L$Rt-:V: 
l.JDEPO 

L5UNIT 
LU1ML 



.ASCII 


/c/ 


.ASCII 


/Z/ 


.ASCII 


/D/ 


.ASCII 


/H/ 


.ASCII 


/w/ 


.BvTe 





.Bl TE 





.B> TE 





.ASCII 


'0 


.ASCII 





".WORD 
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^EQ 24 



002014 


000010 


002016 




002016 


017702 


002020 




002020 


020076 


002022 




002022 


002152 


002024 




002024 


002162 


002026 




002026 


020400 


002030 




002030 


000000 


002032 




002032 


000000 


002034 




002034 


000000 


002036 




002036 


000000 


002040 




002040 


002124 


002042 




002042 


000340 


002044 




002044 


000000 


002046 




002046 


000000 


002050 




002050 


003 


002051 


003 


002052 




002052 


000000 


002054 


000000 


002056 




002056 


000000 


002060 




002060 


004060 


002062 




002062 


011552 


002064 




002064 


000000 


002066 




002066 


000000 


002070 




0020 70 


000000 


002072 




002072 


012410 


002074 




002074 


000000 


0020 76 




002076 


004070 


002100 




002100 


104035 


002102 




002102 


004010 


002104 




002 104 


011566 





.WORD 


10 


LSHPCP: 








' .WORD 


L SHARD 


L*SPCP« 








* .WORD 


LJSOFT 


LJHPTPj 








* .WORD 


l*HW 


LSSPTPj 








'.WORD 


USW 


L51.A0P 








" .WORD 


ULAST 


l.$STA: 








.WORD 





L$CO: i 








.WORD 





L$DTYP. 


■ 






.WORD 





l.SAPT: 








.WORD 





L$DTP: 








.WORD 


UDISPATCH 


L.JPRIO 








' .WORD 


PRI07 


L$ENVI 








* .WORD 





LSEXPl 








* .WORD 





L$MREV 








' .BYTE 


CSREVISION 




.BYTE 


CREDIT 


I.JEF:: 








.WORD 







.WORD 





l.$SPC: 








.WORD 





LSDEVP 








' .WORD 


LJDVTYP 


LSREPP 








'.WORD 


LJRPT 


LSEXP4 








' .WORD 





LJEXP5 








' .WORD 





L$AUT : 








.WORD 





l.iDUTi 








.WORD 


I sou 


LSLUN: 








.WORD 





LJOESP 


; 






.WORD 


l.SOt'SC 


LSLOAO 


, ; 






EMT 


ESl.OAD 


l.SETPj 








.WORD 


ISLRRTBL 


LUCPi 


i 






»WQRD 


UINU 



GRAM HEADER 




002106 




002106 


012372 


002110 




002110 


012370 


002112 




002112 


011560 


002114 




002114 


000000 


002116 




002116 


000000 


002120 




002120 


000000 
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1085 



L*CCP: 








.WORD 


LSCLEAN 


L$ACP: 








.WORD 


L$AUT0 


L$PRT: 








.WORD 


L*PR0T 


LATEST 


* 






.WORD 





L$DLY: 








.WORD 





L*HIME 


• 






.WORD 






SEQ 25 
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SEQ 26 



1097 
1098 
1099 
1100 
1101 
1102 
1103 
1104 



nob 



002122 
002122 
002124 
002124 
002126 
002150 
002132 
002134 
002136 
002140 
002142 
002144 
002146 



000012 

012526 
013010 
013544 
014300 
014750 
015420 
016070 
016540 
017170 
017620 



SBTTL DISPATCH TABLE 



THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST 
IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 



DISPATCH 10 



.WORD 


10 


LSOISPATCH:: 




.WORD 


Tl 


.WORD 


T2 


. ' 'ORD 


T3 


.WORD 


T4 


.WORD 


T5 


.WORD 


T6 


.WORD 


T7 


.WORD 


T8 


.WORD 


T9 


.WORD 


T10 



B3 



c;ohwbo 


DHU 1 1 


FUNIC TS 


DISPATCH TABLE 




lli?0 






1121 






11.V 






1123 






1124 






1125 






11^6 






112 7 






112S 






1120 






1150 






1131 


002150 






002150 


000005 




0021 52 






002152 




1152 






1155 


002152 


160460 


1154 


002154 


177777 


1135 


002156 


0Q2 


1136 






1137 






iisa 


002160 
002160 
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,SBTTL DEFAULT HARDWARE P- TABLE 



J » * 



SEQ 27 



j THE DEFAULT HARDWARE P- TABLE CONTAINS DEFAULT VALUES OF 
l THfc TEST -DEVICE PARAMETERS, THE STRUCTURE OF THIS TQBLE 
j IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P TABLES, 
I AND IS USED AS A "TEMPLATE" FOR BUILDING THE P- TABLES. 

1 •• 



BGNHW DFPTBL 



L *HW: : 
DFPTBL 



.WORD L1Q000-LJHW/2 



.WORD 
.WORD 
.BYTE 

.EVEN 

ENDHW 



160460 
177777 
2 



jDEFAULT 
I DEFAULT 
; DEFAULT 



CSR ADDRESS 
ACTIVE LINES BIT 
LOOPBACK TYPE 



MAP 



LlOOOOi 
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SEQ 28 



1147 
1148 

1149 
11 SO 
1151 

IIS,? 

lis? 

1154 
1155 

1156 
115? 
1158 



1159 

1160 
llol 
116? 
1X63 



SBTTL. SOFTWARE P- TABLE 



THE SOFTUARE TABLE CONTAINS VARIOUS DATA USED By THE 
PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 
AT RUN TIME. 



002160 

002160 000002 

00216? 

002162 

002162 000020 
002164 000000 

002166 
00216b 



BGNSW SFPTOL 



OPTION; 
NDERPT: 



LISW: : 
Sf-PTBL 



.WORD L10001-L*SW/2 



.WORD 
.WORD 



20 




ENDSW 



iBIT MAP or PROGRAM CONTROL FLAGS 

{DEFAULT NUMBtR OF INDIVIDUAL DATA ERRORS TO RPT, 



LtOOOl: 



C7DHWB0 


DMLM1 K»NC rs 1 


SOFTWARE 


P- TABLE 


11 72 




1173 




1174 




1184 




nas 




1186 




1187 




1188 




118* 




1190 




1191 




1192 


000020 


11*5 


177777 


11*4 




1195 




1196 


000000 


11*7 


000002 


1198 


000002 


1199 


000004 


1200 


000006 


1201 


000006 


1202 


000010 


1203 


000012 


1204 


000014 


1205 


000016 


1206 




1207 




1208 


000020 


1209 


000030 


1210 


000100 


1211 




1212 




1227 


002166 




100000 




040000 




020000 




010OO0 




004000 




002000 




001OO0 




000400 




000200 




000100 




000040 




000020 




000010 




000004 




000002 




000001 




001000 




000400 




00C200 




000100 



D3 
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.SBTTL GLOBAL EQUATES SECTION 



l ♦♦ 



SEG1 29 



j THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
ARE USED IN MORE THAN ONE TEST. 



i • - 



NUMLNS--20 

MAPLNS--177777 



, NUMBER OF LINES ON DHU11 IS 8. 
jBIT MAP OF LINES ON DHU11. 



;♦***** DEVICE REGISTER OFFSETS FROM THE CSR' S ADDRESS ♦♦♦♦♦♦ 



CSR0--0 

RBUF0--2 

RXTIM0--2 

LPR0--4 

FSLS0--6 

FDAT0--6 

LNCTR0--10 

TXA010--12 

TXA020--14 

TXBFC0--16 



I CSR REGISTER C^FSET FROM THE CSR ADDRESS 
jRECEIVE REGISTER OFFSET FROM THE CSR AODRESS 
tRECIEVE TIMER REGISTER OFFSET FROM THE CSR ADDRESS 
{LINE PARAMETER REGISTER OFFSET FROM THE CSR ADDRESS 
jFTFOSIZE/STATUS REGISTER OFFSET FROM THE CSR ADDRESS 
jFIFODATA REGISTER OFFSET FROM THE CSR ADDRESS 
{LINE CONTROL REGISTER OFFSET FROM THE CSR ADDRESS 
{TRANSMIT ADDRESS 1 REGISTER OFFSET FROM THE CSR ADDRESS 
{TRANSMIT ADDRESS 2 REGISTER OFFSET FROM THE CSR ADDRESS 
{TRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADDRESS 



.*♦**** EQUATES USED WITK RESPECT TO THE Rx BUFFER ♦**♦♦♦ 

RXBETX--16, J..EVEL OF RX BUFFER AT WHICH TO RE ENABLE TRANSMISSION. 
RXBDTX-'24, {Ll-VEL OF RX 3UFFER AT WHICH TO DISABLE TRANSMISSION. 
RXBFUL--64. |TOTAL CHARACTER CAPACITY QF THE RX BUFFER. 





EQUALS 


j BIT DIFINITIONS 


BIT15-- 


■ 100000 


BIT14-- 


■ 40000 


BIT13- 


20000 


BIT12-- 


■ 10000 


BIT11" 


4000 


BIT10-- 


» 2000 


BIT09-- 


■ 1000 


BIT08-- 


■ 400 


BIT07- 


• 200 


BIT06" 


• 100 


BIT05-- 


• 40 


BIT04- 


• 20 


BIT03-- 


' 10 


BIT02" 


• 4 


BIT01" 


• 2 


BITOO-' 


• t 


BIT9-- 


BIT09 


BIT8-- 


B1T08 


BIT7*. 


bito; 


8IT6»* 


BIT06 



C2DHWB0 
GLOBAL 



DHU-11 
EUUATES 













E3 


func TST 

SECTION 


PART3 


MACRO 


M1200 15 


-MAR-84 09:41 


PAGE 28-1 


000040 






BIT5-- 


BIT05 




000020 






BIT4-- 


BIT04 




0000 10 






BIT3-- 


BIT05 




000004 






BIT2-> 


BIT02 




000002 






BIT1-- 


BITOl 




000001 






BITO-- 


BITOO 





SEQ 30 



000040 
000037 
000036 
000035 
000034 



EVENT FLAG DEFINITIONS 

EF32iEF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 



EF 


START-- 


32. 


EF 


RESTART-- 


31. 


EF 


CONTINUE-- 


30. 


EF 


NEW*- 


29. 


EF 


PWR-- 


28. 



I START COMMAND WAS ISSUED 
j RESTART COMMAND WAS ISSUED 
; CONTINUE COMMAND WAS ISSUED 
j A NEW PASS HAS BEEN STARTED 
j A PQWfcR -FAIL/POWER -UP OCCURRED 



PRIORITY LEVEL DEFINITIONS 



U28 



000340 
000300 
000240 
000200 
000140 
000 1 00 
000040 
000000 



000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
010000 
020000 
040000 
100000 



PRI07-- 


340 


PRI06-- 


300 


PRI05-- 


240 


PRI04-- 


200 


PRI03-- 


140 


PRI02-- 


100 


PP.10! - - 


40 


PR ZOO- • 





{OPERATOR FLAG 


EVL-» 


4 


LOT-- 


10 


ADR-- 


20 


IDU-» 


40 


ISR-- 


100 


UAM-- 


200 


BOE-- 


400 


PNT-- 


1000 


PRI-- 


2000 


IXE-- 


4000 


IBE-- 


10000 


IER-- 


20000 


LOE-- 


40000 


HOE-' 


100000 



CZDHW80 DHU-tl 
GLOBAL EQUATES 


FUNC TS' 
SECTION 


12:: 7 






1238 






1239 






1240 






1241 






1242 






1243 






1244 






1245 






1246 






124 7 






1248 






1249 






1250 


002166 


000200 


1251 


002170 


000204 


1252 


002172 


177777 


1253 


002174 


000 


1254 


002175 


004 


1255 


002176 


000000 


1256 






1257 






1258 






1259 






1260 


002200 




1261 


002200 


160020 


1262 


002202 


160022 


1263 


002204 


160024 


1264 


002206 


160026 


1265 






1266 


002210 


160030 


1267 


002212 


160032 


1268 


002214 


160034 


1269 


002216 


160036 


1270 






1271 






12 72 






1273 






12 /4 


002220 


000000 


1275 


002222 


000000 


12/6 


002224 


000000 


127/ 


002226 


000001 


12/8 


002230 


000000 


1279 


002232 


031463 


1280 


002234 


146314 


1281 


002236 


000000 


1282 


002240 


000000 


1283 


002242 


000000 


1284 


0O2244 


000000 


1285 


002246 


000000 


1286 


002250 


000000 


1287 


002252 


000000 


1288 


002254 


000000 


1289 






1290 






1291 






1292 


002256 


1 / 7546 


12*3 


002260 


000300 



3 
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.SBTTL GLOBAL DATA SECTION 



SEQ 31 



I THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
j IN MORE THAN ONE TEST. 



I********************************************************************** 
i UNIT VARIBLE AREA 

j********************************************************************** 



RXVECA 
TXVECA 

ACTLNS 
LOPBCK 
BRLEVL 

UNITN: 



.WORD 200 |RX VECTOR ADDRESS. 

.WORD 204 jTX VECTOR ADDRESS. 

.WORD 177777 jACTIVE LINE BIT MAP. 

.BYTE jLOOPBACK MODE 

.BYTE 4 j INTERRUPT BUS REQUEST LEVEL 

.WORD j UNIT NUMBER. 



j DEVICE REGISTER 

<*******************- * * 

DRAORTj : 
CSRAj: .WORD 

RXTMA:: RBUFA; ♦ .WORD 
LPRA;: .WORD 

FDATA;: FSLSA: : .WORD 



LNCTRA:: .WORD 

TXAD1A:: .WORD 

TXAD2A:; .WORD 

TXBFCA;; .WORD 

********************** 

ASSORTED GLOBAL 

********************** 

BUFPTR:: .WORD 

CTRLCFt: .WORD 

EXOERR:: .WORD 

TSTNUM:: .WORD 

IES:AT :: .WORD 

LGRP1M;; .WORD 

LGRP2M:: .UORD 

PASCNT:: .WORD 

RXIN1C:: .WORD 

RXINTF- : : .WORD 

TXINTCj: .WORD 

TXINTKj: .WORD 

TP4VEC:: .WORD 

TP4FLG:: .WORD 

WGRD1:: .WORD 
j ********************** 

t I INE TIME CLOCK 
j *******«***.»*«*******« 



************************************************ 

ADDRESS TABLE 
**+.**********♦*.>******************************** 



CL.KCSR 
CLKBRL 



WORD 
WORD 



160020 
160022 
160024 
160026 

160030 
160032 
160034 
160036 

********* 

VARIABLE 
********* 






1 



31463 
146314 








********* 

VARIABLE 
********* 

1//546 
PR 106 



jDHU 
iDHU 
iDHU 
lOHU 
lANO 
iDHU 
iDHU 
jDHU 
jDHU 



11 CSR ADDRESS. 

11 RECIEVE BUFFER/TIMER ADDRESS. 

11 LINE PARAMETER REGISTER ADDRESS. 

11 FIFO SIZE/LINE STATUS REGISTER ADDRESS. 

FIFO DATA REGISTER ADDRESS. 

11 LINE CONTROL REGISTER ADDRESS. 

11 TRANSMIT BUFFER 1 REGISTER ADDRESS 



11 TRANSMIT 
11 TRANSMIT 



BUFFER 2 REGISTER ADDRFSS 
BUFFER COUNT REGISTER ADDRFSS 



♦*****+***********♦*****♦******♦**********♦♦*♦* 

S: 

*********************************************** 

STORAGE FOR RECEIVE CHARACTER BUFFER POINTER. 
STORAGE FOR THE CONTROL -C FLAG. 

"EXIT ON ERROR" FLAG. 
STORAGE FOR THE TEST NUMBER. 
STORAGE FOR STATES OF THE OUT INT 
BIT MAP OF LINES IN LINE GROUP I. 
BIT MAP OF LINES IN LINE GROUP II 



ENABLE BITS 



STO'G FOR PASS COUNT 
STORAGE FOR RECEIVER 
STORAGE FOR RECEIVER 
STORAGE FOR TRANSMIT 
STORAGE FOR TRANSMIT 
STORAGE FOR 



USED IN ROM VERSIONS TST 
INTERRUPT FLAGS. 



INTERRUPT 
INTERRUPT 
INTERRUPT 



FLAGS 
COUNT 
FLAGS 



THE NORMAL 004 



TRAP VECTOR. 
FLAGS SET WHEN AN FXPECTED 004 TRAP OCCURS. 
LOCATION FOR PASSING INDIRECT PARAMETERS. 

4********************************************** 

S AND STORAGE. 
*********************************************** 

i CSR ADDRtSS Of THE I TC . 
j INTERRUPT PRIORITY LEVEL 



OF THE L TC 



CZDHWBO DHU-11 ^'NC TST PART3 
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1294 


002262 


000100 


1295 


002264 


000074 


1296 


002266 


000000 


1297 


002270 


000000 


1298 


002272 


000170 


1299 


002274 


000170 


1500 


0022 /6 


000021 


1501 


002300 


000062 


1502 






1505 






1504 






130*5 






1306 


002302 


1/7572 


1307 


002304 


000000 


1308 


002306 


000000 


1309 






1510 






1311 






1312 






1313 


002310 


000001 


1314 


002312 


000002 


1315 


002314 


000004 


1316 


002316 


000010 


1317 


002320 


000020 


1318 


002322 


000040 


1319 


002324 


000100 


1320 


002326 


000200 


1321 


002330 


000400 


1322 


002332 


001000 


1323 


002334 


002000 


1324 


002336 


004000 


1325 


002340 


010000 


1326 


002342 


020000 


132 7 


002344 


040000 


1328 


002346 


100000 


1329 






1330 






1331 






1332 






1333 


002350 


000000 


1334 


0C2 352 




1335 


002552 




1336 






1337 






1338 






1339 






3 340 


002552 


000000 


1341 


002554 




134? 






1 34 5 






1544 






1345 






l*-4 6 


002610 




134 ; 


002610 


000000 


134H 


00261? 


000000 


1349 


002614 


oocooo 


131*0 


QG2bl6 


Q00Q0O 
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CLKVEC: 


: .WORD 


100 


CLKHRZ: 


: .WORD 


60. 


TIMER1: 


; .WORD 





TIMER2; 


j .WORD 





TIMER3; 


; .WORD 


120. 


BCOUNT: 


; .WORD 


120. 


MS TICK: 


: .WORD 


17. 


MOLCNT: 


j .WORD 


62 



SEQ 32 



j INTERRUPT VECTOR ADDRESS OF THE LTC. 
{INTERRUPT FREQUENCY OF THE LTC, 
, HARDWARE CLOCK COUNTER 01. 
{HARDWARE CLOCK COUNTER 02. 
l HARDWARE BREAK COUNTER LOCATION. 
jBREAK COUNT VALUE IN CLOCK TICKS. 
jNUMBER OF MILLI - SECONDS PER LTC TICK. 
{LOOP COUNT (USED BY MSLOOP) TO DELAY 1 



MS 



****************************************************************************** 

MEMMORY MANAGEMENT VARIABLES AND FLAGS. 

********+******+**************4************************************************ 



MMSRO: 
MMPRES 

MMENAB 



.WORD 177572 {ADDRESS OF MEM MGT STATUS REGISTER 00. 
.WORD {MEM MGT PRESENT FLAG (0 IF MM NOT PRESENT). 
.WORD ,MEM MGT ENABLED FLAG (0 IF MM NOT ENABLED). 



******** 

T 

******** 

BITTBL: : 



********************************************************************** 

ABLE OF WORDS WITH CORRESPONDING BIT SET FOR GENERATION OF BIT MAPS. 
********************************************************************** 
Linen 1 ,RTT O CPT 



.WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 

WORD 



1 

2 

4 

10 

20 

40 

100 

200 

400 

1000 

2000 

4000 

10000 

20000 

40000 

100000 



{BIT 
{BIT 
t BIT 
{BIT 
{BIT 
iOIT 
{BIT 
{BIT 
{BIT 
{BIT 
{BIT 
jBIT 
{BIT 
{BIT 
{BIT 
{BIT 





1 
2 
3 
4 
5 
6 
7 

e 

9 

10 

11 

12 

13 
14 
15 



SET 

SET. 

SET. 

SET, 

SET. 

SET. 

SET, 

SET. 

SET. 

SET. 
SET 
SET 
SET 
SET 
SET 
SET 



********************** 



STORAGE AREA FOR THE BMP CODE QUEUE. 



BMPCQP 
BMPCQB 
BMPCQE 



WORD 
BLKW 




64 



{POINTER USED TO ACCESS 
{STORAGE FOR 32 CELLS. 
{LAST ADDRESS PLUS 2 OF 



THE 


NEXT 


CELL 


IN O.UE 


VEST* PLU 


S BMP 


CODE . 


THE 


BMP 


CODE 


QUEUE . 



****************************************************************************** 

STORAGE AREA FOR ERROR SUMMARY TABLE AND FLAGS, 

****************************************************************************** 



ERSMRF 
ERCNTB 



.WORD 
.BLKW 




16 



{ERROR SUMMARY FLAGS. 
{TABLE OF ERROR COUNTS 



A***************************************************************************** 

STORAGE AREA FOR THE C0N1ENT5 OF THE OUT STAl REGISTER STATES. 

**************** ********.***,*,*,*.*.**** ***************** ************************** 



STSTBi 



.WORD 





.WORD 





.WORD 





*WQRD 






{BASE OF 
{STORAGE 
I STORAGE 
{STORAGE 
I STORAGE 



OUT 
FOR 
FOR 
FOR 
FUR 



STAT 

STAT 
STAT 
STAT 
STAT 



STORAGE TABLE. 

REGISTER FOR LINE 0. 

REGISTER FOR LINE I. 

fttGISTER FOR I INE ?. 

REGISTER FUR LINE 5, 



6t8IWP o8W-^cVW{fi T5 


1551 002620 


oooooo 


1352 002622 


000000 


1553 002624 


oooooo 


1354 002626 


oooooo 


1355 002630 


oooooo 


1356 002632 


oooooo 


1357 002634 


oooooo 


1358 002636 


oooooo 


1359 002640 


oooooo 


1360 002642 


oooooo 


1361 002644 


oooooo 


1362 002646 


oooooo 


13r,3 002650 




1364 




1365 




1366 




136 7 




1368 002650 




1369 002650 




1370 003250 




1371 003450 




1372 003650 




1373 003650 




13/4 




1375 




1376 




1377 




1378 




13 79 




1380 




1381 003/10 




1382 003710 


oooooo 


1383 003712 


000002 


1384 003714 


000004 


1385 003716 


000006 


1386 003720 


000010 


1387 003722 


000012 


1388 003724 


000014 


1389 003 726 


000016 


1390 003 730 


000020 


1391 003732 


000022 


1392 003734 


000024 


1393 003736 


000026 


1394 003740 


000030 


1395 003742 


000032 


1396 003 744 


000034 


1397 003746 


000036 


1398 003750 




1399 




1400 




1401 




14 02 




140-' 




1404 




1405 




14 06 003/50 




1407 003750 


000 
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.WORD 





1 STORAGE FOR STAT REGISTER 


FOR 


LINE 


4. 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


5. 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


6. 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


7. 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


8. 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


9. 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


10 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


11 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


12 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


13 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


14 


.WORD 





{STORAGE FOR STAT REGISTER 


FOR 


LINE 


15 


STSTE:: 




{END OF OUT STAT STORAGE TABLE 







SEQ 33 



♦************************+*************4**********++*******+*************** t ** 

GENERAL TABLE AND BUFFER AREA- -513 WORDS. 

**44444*********44*4*4****4****44444444444444444444*44************************ 



BUFBAS 
ERLTBL 
BUFMID 
BUF3QT 
BUFEND 
ENDETB 



.BLKW 
.BLKW 

.BLKW 



128. 

64. 

64. 



.BLKW 16. 



;BASE OF MEMORY BUFFER. 

{FIRST HALF OF GENERAL TABLE OR BUFFER. 

{SECOND HALF OF GENERAL TABLE OR BUFFER. 

{LAST QUARTER OF THE BUFFER AREA, 

{END OF GENERAL PURPOSE MEMORY BUFFER. 

{BUFFER OVERFLOW SPACE. 



144**44****4*44*********44*4***444444*44444*44444*4********************** 



****** 



. * TABLE FOR STORAGE OF RX/TX L 

j* THE ASSOCIATIONS ARE STORED 

;* WHEN ACCESSING A TABLE OF 

{ * NOTE: DO NOT WRITE A NON- 

• ****************************** 

TXRXLB:: 



INE NUMBER ASSOCIATIONS. 

AS LINE NUMBER TIMES 2 FOR USE AS OFFSETS 

WORDS. 
ZERO VALUE INTO THE UPPER BYTE OF ANY ENTRY. 

*******4*444444**4*444*«****4***4*4************* 



.WORD 





.WORD 


2. 


.WORD 


4. 


.WORD 


6. 


.WORD 


8. 


.WORD 


10. 


.WORD 


12. 


.WORD 


14. 


.WORD 


16. 


.WORD 


18. 


.WORD 


20. 


.WORD 


22. 


.WORD 


24. 


.WORD 


^b. 


.WORD 


28. 


.WORD 


30. 



TXRXLE 



.EVEN 



{BASE OF TX/RX LINE NUMBER 
{TX/RX LINE OFFSET FOR RX/ 
{ TX/RX LINE OFFSET FOR RX/ 
jTX/.O'. LINE OFFSET FOR RX/ 
{TX/RX LINE OFFSET FOR RX/ 
{TX/RX LINE OFFSET FOR RX/ 
{IX/RX LINE Dl-fSbl >■ OH RX/ 
{TX/RX LINE OFFSET FOR RX/ 
;TX/RX LINE OFFSET FOR RX/ 
jTX/RX LINE OFFSET FOR RX/ 
{TX/RX LINE OFFSET FOR RX/ 
jTX/RX LINE OFFSET FOR RX/ 
jTX/RX LINE OFFSET FOR RX/ 
{Ta/RX LINE OFFSET F0« RX/ 
j TX/RX LINE OFFSET FOR RX/ 
jTX/RX LINE OFFSET FOR RX/ 
tTX/RX LINE OFFSET FOR RX/ 
{END OF TX/RX LINE NUMBER 
{GUARANTEE THAT NEXT TABLE 



3. 



6, 



ASSOCIATION TABLE. 
TX LINE 0. 
TX LINE 1. 
TX LINE 
TX LINE 
TX LINE 4. 
TX I INE •* 
TX LINE 
TX LINE 7. 
TX LINE 8. 
TX LINE 9. 
TX LINE 
TX LINE 
TX LINE 
TX LINE 
TX LINE 14. 
TX LINE 15. 
ASSOCIATION TABU.. 

IS ON WORD BOUNDARY 



10. 
11. 
12. 
I*. 



j ******************************************************** ** ***** ******* ******** 

{♦ TABLE FOR STORAdE OF RX/TX LINE NUMBER ASSOCIATIONS, 

5* THE ASSOCIATIONS ARE STORED AS LINE NUMBERS WHICH CAN BE USED AS SUCH OR 

{♦ AS OFFSETS WHEN ACCESSING A TABLE OF BITES. 

;«******4*4*4***44************** 444*4444*44444444**4444444*4*4****** *********** 



TXRLNBj 



.BYTE 



jBASt 0> TX/RX LINE NUMBF R 
j TX/RX LINE C 0R RX/TX LINE 



AS 

0. 



S0C1AT1UN TABLE 
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SEQ 34 



1408 


003751 


001 


1409 


003752 


002 


1410 


003753 


003 


1411 


003754 


004 


1412 


003755 


005 


1413 


003756 


006 


1414 


003757 


007 


1415 


003760 


010 


1416 


003761 


on 


1417 


003762 


012 


1418 


003763 


C13 


1419 


003764 


014 


1420 


003765 


015 


1421 


003766 


016 


1422 


00376? 


017 


1423 


003770 




1424 






1425 






1426 






1427 






1428 






1429 






1430 






1431 






1432 






1433 


0037 70 




1434 


003770 


004 


1435 


003771 


006 


1436 


003772 


000 


14 37 


003773 


002 


1438 


0037 74 


014 


1439 


003775 


016 


1440 


003776 


010 


1441 


003777 


012 


1442 


004000 


024 


1443 


004001 


026 


1444 


004002 


020 


1445 


004003 


022 


1446 


004004 


034 


144 7 


004005 


036 


1448 


004006 


030 


144^ 


004007 


032 


1450 






1451 






1464 


004010 
004010 






004010 


000000 




004012 


000000 




004014 


000000 




004016 


000000 


1465 






1466 







TXRLNE: 



BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 
BYTE 

EVEN 



I. 

2 

3. 
4. 
5. 
6. 
7. 
8. 
9, 
10 
11 
12 
13 
14 
15 



TX/RX LINE TOR 

TX/RX LINE TOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 

TX/RX LINE FOR 
END OF TX/RX L 
GUARANTEE THAT 



RX/TX LINE 1, 

RX/TX LINE ?. 

RX/TX LINE 3. 

RX/TX LINE. 4. 

RX/TX LINE 5. 

RX/TX LINE 6. 

RX/TX LINE 7. 

RX/TX LINE 8. 

RX/TX LINE 9. 

RX/TX LINE 10. 

RX/TX LINE 11. 

RX/TX LINE 12. 

RX/TX LINE 13. 

RX/TX LINE 14. 

RX/TX LINE 15. 
INE NUMBER ASSOCIATION TABLE. 

NEXT TABLE IS ON WORD BOUNDARY 



* TABLE OF TX/RX LINE NUMBER ASSOCIATIONS IN STAGGERED LOOPBACK. 

* THE ASSOCTATIONS ARE STORED AS LINE NUMBER TIMES 2 FOR USE AS OFFSETS 

* WHEN ACCESSING A TABLE OF WORDS. 

+ THIS IS A TABLE OF DATA FOR READING ONLY. USE TO LOAD THE ABOVE TABLE, 

* NOTE: MUST CONVERT FROM BYTES TO WORDS WHEN LOADING ABOVE TABLE. 
+•***+********++**+*****+*+*+++*******#********#***♦**♦****♦*♦**+*#♦**♦*****+* 



TGTRB: 





.BYTE 


4. 






.BYTE 


6. 






.BYTE 









.BYTE 


2. 






.BYTE 


12. 






.BYTE 


14. 






.BYTE 


8. 






.BYTE 


10. 






.BYTE 


20. 






.BYTE 


22. 






.BYTE 


16. 






.BYTE 


18. 






.BYTt 


28. 






.BYT' 


30. 






.EYTE 


24. 






.BYTE 


26, 






.EVEN 








ERRTBL 






ERRTYP: 




.WORD 





ERRNBR: 




.WORD 





ERRMSG- 




.WORD 





t'RRBLK: 




.WORD 






j BASE OF STAGGERED 


TX/RX LINE NUMBER TABLE. 


; TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


0. 


; TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


1. 


; TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


2. 


I TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


3. 


} TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


4. 


j TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


5. 


j TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


6. 


;TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


7. 


i TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


8. 


j TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


9. 


5 TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


10. 


jTX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


11. 


} TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


12. 


I TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


13. 


j TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


14. 


{TX/RX 


LINE 


OFFSET 


FUR 


RX/TX LINE 


15. 


j GUARANTEE 


THAT NEXT TABLE IS ON WORD BUUNDAR1 










LiERRTBL: 





.EVEN 



UJ 



3 
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SEQ 35 



1468 
1469 
14/0 
14 71 
14 7? 
1475 
14 74 
1475 
14 76 
1477 
14 78 
14 79 
1480 
1481 
14 82 
1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 
1491 
149^ 
1493 
1494 
1495 
1496 
1497 
1498 
149') 
1500 
1501 
1502 
1503 
1504 



SBTTL GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 

**********************************,(*************** + ** + * + *********************** 



THERE ARE 4 ROUTINES AND MACRO DEFINITIONS USED FOR THE HANDLING OF 
GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS PROGRAM. THE POUR 
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES: 



SAVE - 
PASS - 



PREG05 



MACRO DEFINITION USED AT THE BEGINNING OF A SUBROUTINE \0 

SAVE THE GPR CONTENTS FOR LATER RESTORATION. 
MACRO DEFINITION USED AT THE END OF A SUBROUTINE TO RESTORE 

THE PREVIOUSLY SAVED GPR CONTENTS AND TO LF.AyE THE CONTENTS 

OF THE SPECIFIED GPRCS) INTACT (NOT RESTORED). 
- SUBROUTINE WHICH IS CALLED FROM THE SAVE AND PASS MACRO 

EXPANSIONS WHICH ACTUALLY PERFORMS THE ACTIONS ON THE GPRS. 



DURING 


A SUBROUTINE WHICH USES THESE GPR SAVE 1 


OF THE 


GPRS ARE STORED ON THE STACK IN THE FOLI 




SP -> RET PC INTO PREG05 ROUTINE, 




SP*2 -> GPR RO CONTENTS, 




SP*4 -> GPR Rl CONTENTS. 




SP»6 -> GF-R R2 CONTENTS. 




SP*8 -> GPR R3 CONTENTS. 




SP*10 -> GPR R4 CONTENTS. 




SP*12 -> GPR R5 CONTENTS. 




SP*14 -> RET PC INTO CALLER OF SUB'TNE 



ROUTINES THE 
LOWING STACK 



VALUES 
FRAME s 



* 

* 
* 
* 
+ 

* 
* 
* 

* 
* 
* 

* 
* 
* 
♦ 
* 
* 
* 
+ 
* 
* 
* 
* 
* 
* 

* 
* 
* 
* 
* 
* 
* 
********************************************** ******************************** 



EACH LEVEL OF SUB'TNE CALLING USES 8 
THE SAVE AND PASS MACROS CAN ALSO BE 
TO SAVE AND RESTORE THE GPR VALUES. 
ISSUING OF A PASS CALL THE GPRS WILL 
THEY HAD PRIOR TO THE LAST SAVE CALL 
OR PASSED INTACT, GPRS SPECIFIED AS 



WHICH CALLED PREG05, 



WORDS OF STACK OVERHEAD. 
USED IN "STRAIGHT LINE CODE 
IN ANY CASE, AFTER THE 
BE RESTOREO THE VALUES 
(EXCEPT FOR THE EXCEPTED, 
PARAMETERS TO THE PASS CALL) 



WILL 
THE 



AND THE SP 
SAVE CALL. 
VALUE WHEN THE 
THE SAVE MACRO 



ALSO BE RESTORED TO ITS 
PROGRAMMER MUST BE SURE 



FONOITION BEFORE THE LAST 
AT THE SP HAS THE SAME 



PASS MACRO IS 
WAS CALLED, 



CALLED AS IT HAD IMMEDIATELY AFTER 



!<"* 



j 
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SEQ 36 



1506 




1507 




1508 




1509 




1510 




1511 




151? 




1513 


000036 


1514 


000016 


1515 


000014 


1516 


000012 


1517 


000010 


151tf 


000006 


151^ 


000004 


1520 


000002 



SBTTL GPR FRAME ACCESS EQUATES 

» ♦ » 

EQUATES THAT ALLOW ACCESS TO THE STACK FRAME. THESE ARE THE 
OFFSETS INTO THfc STACK FOR REGISTERS SAVED DURING THE PREG05 
ROUTINE. 



PC 



LPCSLT*" 


36 


j OFFSET FOR LAST RETURN 


PCS1.0T" 


16 


, OFFSET FOR RETURN PC. 


R5SL0T-- 


14 


j OFFSET FOR R5 . 


R4SL0T" 


1? 


jOfFSET FOR R4. 


R3SL0T-- 


10 


jOF^SET FOR R3. 


H2SL0T-- 


6 


{OFFSET FOR R2. 


R1SL0T-* 


4 


lOFFSET FOR Rl. 


ROSL0T*= 


2 


lOFFSET FOR RO. 



L3 
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GLOBAL MACRO DEFINITION - SAVE - 

1522 , SBTTL G! OBAL MACRO DEFINITION - SAVE - 

1523 ; ***>******^ + +***«** 4. ************* **********a********************************** 

1524 {♦ THIS MACRO IS USED AT THE BEGINNING OF A SUBROUTINE TO SAVE THE 

1525 ;* CONTENTS OF THE GPRS RO THRU R5. 

1526 5* 

1527 ;* INPUTSj SP - UNCHANGED SINCE SUBROUTINE WAS ENTERED 

1528 { * R5SL0T - OFFSET TO STACK SLOT FOR R5 (EQUATED TO 14 OCTAL) 

1529 { * 

153u ;* OUTPUTS: GPR SAVE AREA ON THE STACK IS LOADED WITH THE CONTENTS OF GPRS 

1531 »* TOP OF STACK - LOADED WITH THE RETURN ADDRESS INTO PREG05 

1 S3"* • * 

1533 !+ CALLING SEQUENCES SAVE 

1534 ;* 

1535 l* COMMENTS: NO ARGUMENTS ARE ALLOWED. 

1536 ;♦ THE PASS MACRO SHOULD BE CALLED TO RESTORE THE GPR VALUES. 

1537 ; * 

1538 ;* SUBORDINATE ROUTINES CALLED.- PREG05. 

1559 {♦ *.***. *4.*********************** **************,*,** + * ****** ************** ********* 

1540 

1541 .MACRO SAVE 

1542 .LIST 

1543 JSR R5.PREG05 {CALL REGISTER SAVE SUBRT. 

1544 .NLIST 

1545 % ENDM SAVE 



M3 



CZDHWBO DHU-11 FUNC TST PART3 
GLOBAL MACRO DEFINITION 

1547 

1548 
1549 
1550 
1551 
1552 
1553 
1554 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
156,? 
1563 
1564 
1565 
1566 
1567 
1568 
1569 
1570 
1571 
157c 5 
1573 
1574 
1575 
1576 
1577 
15/8 
1579 
1580 
1581 
158? 
1583 
1584 
1585 
1586 
158/ 
1588 
1589 
1590 
1591 
1592 
1593 
1594 



GPRS 

ONLY ALLOWED ARGUMENTS ARE "RO" THRU "R5". 

ROSLOT THRU R5SL0T MUST BE EQUATED TO THEIR RESPECTIVE GPR SAVE 
SLOT OFFSETS BEFORE CALLING THIS MACRO. 

THE GPR VALUES ARE PUT IN THEIR RESPECTIVE SLOTS ON THE STACK. 



PASS 



R0.R1, 



MACRO M1200 15-MA 84 09-41 PAGE 33 
- PASS - 

.SBTTL GLOBAL MACRO DEFINITION - PASS - 

+ THIS MACRO IS USED IN CONJUNCTION WITH THE SAVE MACRO. IT IS 

* CALLED AT END OF A SUBROUTINE TO PASS PARAMETERS IN GPRS BACK TO THE 

* CALLING ROUTINE BY ALTERING THE GPR SAVE AREA ON THE STACK AND THEN 

* RETURNING TO PREG05 TO RESTORE THE GPRS TO THEIR SAVED VALUES. 

* 

+ INPUTS; 

4 
4 

* 

* OUTPUTS: 

+ 

* CALLING SEQUENCE; 

4 

* COMMENTS: 

4 
+ 

4 
* 
+ 

?* 
;* 
;* 
;♦ 
:* 

5* 

;* 
i + 
;* 
;* 
i* 
;♦ SUBORDINATE ROUTINES CALLED; CPREGRT - LABEL WITHIN PREG05, VALUF ON STACK.) 

I 44,444.44** 444 44 44 44444444444444444**444*4 444**44** 4***44* ********* 444444******* 



SEQ 38 



ANY 
FOR 



COMBINATION OF GPR ARGUMENTS MAY 
EXAMPLE, THE FOLLOWING ARE LEGAL 
PASS Rl 
PASS R4 RO R2 
GPRS LISTED As'aRGUMENTS WILL 8E 
CALLING ROUTINE. ALL OTHER GPRS WILL 
THE SP MUST BE AT ITS ORIGINAL VALUE 



THE 



BE LISTED IN ANY ORDER 



PASSED INTACT TO THE 

BE RESTORED. 

WHEN PASS IS CALLED. 



THE 



MACRO CALL 

PASS RO R3 
EXPANDS INTO THE FOLLOWING ASSEMBLY CODE; 

MOV RO.ROSLCT(SP) ;PU1 RO 

MOV R3,R3SL0T(SP) {PUT R3 

JSR PC.S(SP)* jRETURN 

IN THIS EXAMPLE GPRS Rl, R2, R4 , AND R5 WILL BE 

THEIR VALUES CONTAINED IN THE STACK FRAME AND RO 

WILL BE LEFT AT THEIR VALUES PRIOR TO THIS PASS CALL 



IN 


STACK 


SLOT. 


IN 


STACK 


SLOT. 


TO 


PREG05 SUBRT 


RESTORED 


TO 


AND R3 





.MACRO PASS A.B.C.D.E.F 
.IRP X,<A,B,C,D,E,F> 
.IF NB.X 
.LIST 

MOV X.X'SLOT(SP) 
.NLIST 
.ENDC 
.ENDM 
.LIST 

JSR PC,S(SP)» 
.NLIST 
,ENDM PASS 



5 PUT X IN STACK SLOT. 



{RETURN TO PREG05 SUBRT 



N3 
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1596 

1597 
1598 
1599 
1600 
1601 



1603 
1604 
1605 
1606 
1607 
1608 
1609 
1610 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
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SEQ 39 



.SBTTL GLOBAL SUBROUTINE - PREG05 - 

* PRESERVE REGISTERS RO THROUGH R5 FOR SUBROUTINE CALLS. 

* INPUTS: THE RETURN AOORESS BACK INTO THE CALLING ROUTINE MUST BE IN 

* GPR R5. (I.E.- MACROS USE "JSR RS.PRFG05".) 

* 

* OUTPUTS: REGISTERS RO THROUGH, R5 ARE SAVED ON THE 

* 

•CALLING SEQUENCE: SAVE {MACRO EXPANSION 



[SUBROUTINE CODE]. 

PASS {MACRO EXPANSION 

THIS ROUTINE IS RE-ENTRANT, 



STACK. 

CALLS PREG05. 

RECALLS PREG05. 



* 

•COMMENTS: 
* 

* 

+ 

•SUBORDINATE ROUTINES CALLED: NONE. 

******* + **.** + + + + 4i + + + + ****. + * + * + * + * + + + + + **** + + ** + + ***** + + + *** + ** + + ** + ** + +. + + + **** 



PARAMETERS MAY BE PASSED OUT OF A SUBROUTINE BY MODIFYING THE 

REGISTER SAVE AREA ON THE STACK. USE THE PASS GPRN MACRO 

TO RETURN GPR VALUES INTACT. 

USE THE RNSLOT OFFSETS FROM THE SP TO PASS OTHER PARAMETERS. 

[EXAMPLE: MOV VALUE .ROSLOTC SP ) ] 

MAKE SURE THE SP IS AT ITS ORIGINAL VALUE WHEW YOU 00 THIS. 



004020 
004020 
004022 
004024 
004026 
004030 
004032 
004034 



010446 
010346 
010246 
010146 
010046 
010546 
016605 



000014 



004040 004 736 



004042 
004044 
004046 
004050 
004052 
004054 



012605 
012600 
012601 
012602 
012603 
012604 



PREGRTj 



;R5 HAS BEEN LOADED ON THE STACK BY THE SUBROUTINE CALL 
{SAVE R4 
{SAVE R3 
{SAVE R2 
{SAVE R1 
{SAVE RO 

{PUSH RETURN PC ON TOP OF STACK 
{RESTORE R5 TO VALUE IT HAD BEFORE CALLS 

{CALL THE SUBROUTINE AT THE RETURN ADDRESS 
{FROM THE PREG05 CALL. PUTTING THE PRESENT 
{PC ON THE STACK AS A RETURN ADDRESS INTO 
{THIS (PREG05) ROUTINE. 

; ♦ ♦♦ 

{THE FOLLOWING COOE IS EXECUTED WHEN THE CALLING ROUTINE DOES A 

: "RETURN" [JSR PC.SKSP)*] USING THE PC DEPOSITED ON THE STACK ABOVE. 



IN R5. 



PREG05: 




sR5 H 




MOV 


R4.-CSP) 




hov 


R3, -(SP) 




MOV 


R2.-CSPJ 




MOV 


Rl.-CSP) 




MOV 


RO.-CSP) 




MOV 


R5, (SP) 




MOV 


R5SL0T(SP),R5 




JSR 


PC,9« "3) + 



MOV 


(SP)».R5 


{PUT RETURN PC 


MOV 


(SPH.RO 


{RESTORE RO. 


MOV 


(SP)*,R1 


{RESTORE Rl. 


MOV 


(SP)»,R2 


{RESTORE R2. 


MOV 


(SP)*,R3 


{RESTORE R3. 


MOV 


(SP)*»R4 


{RESTORE R4. 



004056 000205 



RTS 



R5 



{RETURN TO THE SUBROUTINE WHICH CALLED PREU05* 
{RESTORING R5 IN THE PROCESS » 
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1650 
1656 
1659 

1660 
1661 
166 J 
1665 
1*64 
166^ 
1666 
166 7 
1668 
1669 
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SEQ 40 



004060 
004060 
0040*0 
00406 3 
004066 



16/0 
1676 
1677 

1676 
1679 



T3/ 



0040 70 
0040 70 
004070 

0040 73 
0O4076 
004101 
004 104 
0O410 7 
004] IP 
004115 



1680 
16R1 
IWtt 



104 
055 
000 



no 

061 



104 

055 
040 

lib 
124 
040 
UV 
000 



no 

061 
106 
105 
123 
120 
124 



125 
061 



25 



061 
125 
040 
124 
iOl 
063 



SBTTL GLOBAL TEXT SECTION 



THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
MORE THAN ONE TEST, 



NAMES OF DEVICES SUPPORTED Ht PROGRAM 
DEVTYP <DHU-li> 



I JDVTYPs i 



.ASCI/ /OHU-11/ 



.EVEN 



i TEST DESCRIPTION 
Dt SCRIPT 



<DHU-U FUNC TST PART3> 



LiDESCii 



.ASCI/ /DHU-11 FUNC TST PAR 



,LVEN 



• feVfcN 
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PAGE 36 



SfcG) 41 



lb*? 

1698 
lfc*w 

1700 
1701 
170^ 
1703 
1704 
1705 
1706 
1707 
1708 
1709 
1710 
1711 
1/1? 
1?13 
1714 



004116 
004123 
004155 
004^13 
004 305 
004371 
0044P3 
004501 
004601 



.NLIST BIN 



EF0503 
EK1601 

EF7801 
F.F8401 

FF840? 

EF9301 

EF930a 
MFUNIT 



, ++**+♦*** FORMAT STATEMENTS USED IN PRINT CALLS +**♦♦♦♦*♦ 

,ASCI7 /*T*N/ 

. 4SCIZ /*A *T*A, TEST ABORTED #N/ 

.ASCIZ /#T#A ON LINE *02#A DECIMAL. #N/ 

.ASCI/ /*A *T*A FOP LINE *02*A(D) AFFECTS OTHER MODEM SIGNALS, *N/ 

.ASCI? /*A CHANGING #T*A FOR LINE *D?*A(D) AFFECTED / 

.ASCIZ /*T*A FOR LINE *D2*A(D) .*N/ 

.ASCIZ /*A *T*D2*A(D), BMP CODE REPORTED :*03*A(0)*N/ 

.ASCIZ /*A OVERFLOW OCCURRED (MORE THAN 31 BMP CODES FOUND IN QUEUE )*N/ 

.ASCIZ /*N*A TESTING UNIT t*D4tlN/ 
*tVEN 

.LIST BIN 
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SEQ 42 



1723 
1724 

17.25 
1726 
1727 
1726 
1729 
1730 
1731 
173? 
1733 
1734 
1735 
1736 
1737 
1738 
1739 
1740 
1741 
174? 
1743 
1744 
1745 
1~?46 
1747 
1748 
1749 
1?50 
17*U 
i.7:v> 

:/5- 

. * « 
17V* 
1756 



004632 
004670 
004753 
005015 
005035 
005077 
005117 
005163 
005227 
005272 
005335 
005401 
005445 
005511 
005555 

0056*13 
OOlifvt ? 

005. r^ 

CO:? ."*) : 
00 fs '50 

006124 



.NLIST BIN 



EM0103 
EM1601 
EM7801 
EM7802 
EM7901 
EM 7 902 
EM8001 
EM8002 
EM8101 
EM8102 
EM8201 
EM8202 
EM8301 
EM8302 
EM8401 
EH3402 
EH8403 
EM8404 
F-MS405 
EM8406 
EM8501 
-M8502 
EM9301 
FtM302 
EM9303 
EM93Q4 



,********* GLOBAL ERROR MESSAGES +*♦********* 

.ASCIZ /DEVICE REGISTER ACCESS ERRORS/ 

.ASCIZ /TIMEOUT OCCURRED WAITING FOR MASTER RESET TO CLEAR/ 
.ASCIZ /MODEM CONTROL DTR BI f TEST FAILED/ 
.ASCIZ / DTR BIT FAULTY/ 

. ASCIZ /MODEM CONTROL RTS BIT TEST FAILED/ 
, ASCIZ / RTS BIT FAULTY/ 

.ASCIZ /DSR MODEM STATUS SIGNAL TEST FAILED/ 
.ASCIZ / DSR MODEM STATUS SIGNAL DEFECTIVE/ 
.ASCIZ /RI MODEM STATUS SIGNAL TEST FAILED/ 
.ASCIZ / RI MODEM STATUS SIGNAL DEFECTIVE/ 
.ASCIZ /CTS MODEM STATUS SIGNAL TEST FAILED/ 
.ASCIZ / CTS MODEM STATUS SIGNAL DEFECTIVF/ 
.ASCIZ /DCD MODEM STATUS SIGNAL TEST FAILED/ 
.ASCIZ / DCD MODEM STATUS SIGNAL DEFECTIVE/ 
.ASCIZ /DTR MODEM CONTROL SIGNAL INTERACTIONS TEST FAILED/ 
.ASCIZ /DTR/ 
.ASCIZ /OSR/ 
.ASCIZ /RI/ 
.ASCIZ /DCD/ 
.ASCIZ /CTS/ 

.ASCIZ /RTS MODEM CONTROL SIGNAL INTERACTIONS TEST FAILED/ 
.ASCIZ /RTS/ 

.ASCIZ /BMP CODES WERE REPORTED DURING THIS DIAGNOSTIC/ 
.ASCIZ /BMP CODE FOUNO IN TEST / 
.ASCIZ /THE LAST BMP CODE WAS FOUND IN TEST / 
.ASCIZ /UNEXPECTED BMP CODES FOUND DURING THIS PASS/ 
*EV£N 

♦LIST BIN 



E4 
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GLOBAl IF- XT SECTION 

1 /t>S 

l?*b 

liV' .SBTTL GLOBAL ERROR REPORT SECTION 

1 76* j * ♦ 

1770 t THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

17-1 j USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTS 

l.'.V ; (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 

1773 ,-- 
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F4 
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SEQ 44 



1 '75 
17 76 

17 77 
IV 78 
IV 79 

1780 
1781 
178c 1 

xrsi 

1 /»4 
1 7rtS 

17116 

1 7 #7 

1 738 
17,'<9 

1 ;*>o 

1791 
179-^ 
1 /9;t 
17S*4 
1.79': 
1796 

179 7 
1 V9fl 

1799 

5 JJOO 

180 i 

iriiV 
I 80S 

5 £04 

180.i 
1 SOfj 
1>)'>- 

IBO'1 0Oft,"H6 

1W9 O06222 

l<i?0 006224 

0C6224 

006230 

006234 

00ft 240 
006244 

* '06252 
006252 
(.»<!€ ?r>6 
OOft262 
00.6? 64 
O06266 

1814 ok-;.'/;? 

006272 

<J 06302 
006 304 
006S06 



006200 

006200 

00*200 

006200 

ooft;-? 04 

006210 
006214 



181 > 

iai? 



004567 175614 

012700 000100 

046700 173746 
001036 



032705 
001410 

012746 
012/46 
010600 
104414 
062706 
032705 
001410 

012746 
012746 
010600 
104414 
062706 

012746 

012/46 
010600 
104415 
0627Q6 



000001 



006316 
000001 



000004 
000002 



006374 
000001 



000004 

0064 53 
000001 



000004 



SBTTl GLOBAL ERROR REPORTING ROUTINE - ER0101 - 

* THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 

* INFORMATION IF AN ERROR IS DETECTED IN TEST 1 (REGISTER ADDRESS 

* ACCESS TEST). IF THE "EXTENDED ERROR INFO" OPTION HAS BEEN SELECTED 

* THEN THIS SUBROUTINE WILL REPORT THE TYPE OF ACCESS (READ OR WRITE OR 
+ BOTH) WHICH CAUSED A BUS TIME-OUT TRAP (004 TRAP). A MESSAGE INDICATING 

* THAT THE DHU MAY BE AT THE WRONG UNIBUS ADDRESS IS ALSO PRINTED. 

* INPUTS: 

* 
+ 

* OUTPUTS t 

* 

CALLING SEQUENCE} 



R5 - 



ERROR FLAG WORD, 
IF BIT IS SET 
IF BIT 1 IS SET 



A READ ERROR OCCURED. 
A WRITE ERROR OCCURED, 



MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 



INCLUDE THE LABEL "EROlOl" AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



* 

* COMMENTS: 

* + + +± + + + + + + + ± + *4, + + * + + + +.+ **** + +,**, + + +, + + + + + * + + + l*ti t + *,* + *t**4, + + *.**i.i*4.t* + *tt + t + + tt 



SUBORDINATE ROUTINES USED: NONE. 



BGNMSG 
SAVE 



MOV 
BIC 
BNE 



ER0101 



JSR 



06IT06.R0 
OPTION, RO 
6* 



ER0101:: 
{SAVE THE GPR CONTENTS. 
R5,PREG05 {CALL REGISTER SAVE SUBRT. 

iSET-UP THE BIT MAP FOR REPORT EXT'D ERROR INFO 
{TRY AND CLEAR THE FLAG. 
{EXIT IF OPTION NOT SELECTED. 



REPORT EXTENDED ERROR INFQMATION 



BIT 06IT0.R5 
BEQ 2$ 
PRINTB GMSGl 



2*: 



BIT 
BEQ 
PRINTB 



0BITI.R5 
4S 

0MSG2 



I TEST FOR READ ERROR. 

{SKIP READ ERROR MSG IE NO READ ERROR 

{PRINT READ ERROR MESSAGE, 

MOV 

MOV 

MOV 

TRAP 

ADD 



{ TEST FOR WRITE ERROR. 
{SKIP WRITE ERROR MSG IF NO 
{PRINT WRITE ERROR MESSAGE. 



0MSG1, tSP) 
* 1 , - ( SP ) 

SP.RO 

C5PNTB 

44,SP 



4*1 



PR INT X GMSU3 



[SUGGEST THAT DMU MAY BE AT 



WRITE ERROR 

MOV 
MOV 
MOV 
TRAP 
ADD 
WRONG ADORE 
MOV 
MOV 
MOV 
TRAP 

ADD 



0HSG2 
01. -C 

SP.RO 
C$PNTB 
04,SP 
SS. 
0MSG3, 
CI , (S 
SP.RO 
C5PNTX 
#4,SP 



• C SP ) 

P) 



•ISP) 

P) 



CZDHUHG D'tU-U KUNC TST PART 3 
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G4 
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1815 


0'.:-o512 
006312 


004736 






'.816 


0a-,314 
006314 
006314 


104423 






1617 










1818 


oo.oi6 


045 


101 


102 




00.-/521 


125 


123 


040 




00'.i?54 


124 


111 


115 




00^327 


105 


055 


117 




uww 


125 


124 


040 




fx.*>S3S 


124 


122 


101 




00o?40 


120 


040 


103 




00;V>43 


101 


125 


123 




0<^S46 


105 


104 


040 




006351 


102 


131 


040 




006354 


122 


105 


101 




O0</35/ 


104 


040 


101 




006362 


124 


124 


105 




000 '.6 s * 


115 


120 


124 




0C*3''0 


056 


045 


116 




005573 


000 






1819 


0.-'.vT74 


045 


101 


102 




ooo^r? 


125 


123 


040 




0'"M02 


124 


111 


115 




o::-^05 


105 


055 


117 




Oi-oUO 


125 


124 


040 




0,>>*;i3 


124 


122 


101 




o.: i nai6 


120 


040 


103 




■';6*' ! -.?i 


101 


125 


123 




<>■; "6424 


105 


104 


040 




r>i , *i4 c ?7 


102 


131 


040 




i»iJ(i43J 


127 


122 


111 




C'.;i.4 3S 


124 


105 


040 




00 64 ft o 


101 


124 


124 




0<V*i43 


105 


115 


120 




0'. '-.446 


124 


056 


045 




oo>vji 


116 


000 




1820 


oovr.is 


045 


101 


104 




0u0456 


110 


125 


040 




OOo-thl 


115 


101 


131 




A 64M 


040 


102 


105 




*v -:,4( : .7 


040 


101 


124 




OOtVt f,"? 


040 


124 


110 




0004 /5 


105 


040 


127 




U-c-^OO 


122 


117 


116 




00.0 i.-. 


107 


040 


125 




*.":->iOO 


lib 


111 


102 




G'V.iU 


12S 


125 


040 




CO M5 J 4 


101 


104 


10* 




00uSl7 


122 


105 


123 




'""V,'vV_i 


123 


056 


045 




Oaxv r , 


116 


04* 


116 




Oi"idQ 


000 






is;»i 










X«22 











6$; 



PASS 
ENDMSG 



09:41 PAGE 39-1 



JSR 



^EG 45 



{RESTORE THE GPR CONTENTS. 



PC.B(SP)* 



: RE TURN TO PREG05 SUBRT 
L10002: 



TRAP 



C$MSG 



MSGIjj .ASCIZ /rfABUS TIME-OUT TRAP CAUSED Bf READ ATTEMPT >N/ 



MSG2:: .ASCIZ /rfABUS TIME-OUT TRAP CAUSED BY WRITE ATTEMPT, *N/ 



MSb3i: .ASCIZ /*ADHU MAY BE AT THE WRQNG UNIBUS ADDRESS, *N*N/ 



♦ EVEN 



H4 



C7DHWK) O'lii XI rUNC TST PART3 
GLOBAL LRROK REPORTING ROUTINE 



18.:m 
is,?:-* 

182b 

is;?/ 

1820 
18?? 
1830 
1831 
1832 
1633 
1834 
183S 
183*'* 
1837 
3 8 38 
183-'* 
18*10 
1801 
1842 
18*1 ?. 
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SEQ 46 



1844 
1845 
184 b 
1847 
1848 
134 > 
1850 



.*8Si 
18b2 



Oi\V532 
0065 52 

OJ6S32 
0065 S6 
00654^ 



006 M 4 
iVb r 344 
00b546 
006552 
006556 
006560 
00o562 

OOb'ibb 
006566 
00b l .) 66 



012700 
046700 
001011 



01014b 
012746 
012746 
010600 
104414 
062706 



104423 



000100 
173420 



004116 
000002 



000006 



.SB 

** 

+ 

4 

4 
4 
4 

$ + 

;* 

!* 

+ 

4 
44 



TTL GLOBAL ERROR REPORTING ROUTINE - ER0503 - 

4*******444***4***************4**4***44444444444444444**4**4444444444 44 44444 

THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 
MESSAGE WHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER, PROVIDED 
EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 

INPUTS: Rl - ADDRESS Of THE MESSAGE TO PRINT. 

OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE, 



CALLING SEQUENCE: 



LOAD THE ADDRESS OF THE MESSAGE IN Rl. 

INCLUDE THE LABEL "ER0503" AS THE MESSAGE POINTER 

PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: 



THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 



SUBORDINATE ROUTINES USED: NONE, 

********* 4********* ******* ** ******** ******4****44***444444444444444*44444444 



BGNMSG ER0503 



ER0503 



MOV 


4BIT06,R0 


BIC 


OPTION, RO 


BNE 


2$ 



PRINTB OEF050* Rl 



5 TRY TO CLEAR THE 

jfcXT'D ERROR REPORTING FLAG 

{EXIT IF FLAG NOT SET. 



} PRINT THE MESSAGE. 



$: 



LNDMSG 



MOV 


Rl. -C5P) 


MOV 


OEF0503, -'SP) 


HOV 


•2. -CSP) 


MOV 


SP.RO 


TRAP 


C$PNTB 


ADD 


06. SP 


L 10003: 





TRAP 



C*MSG 



CZDHWUO 


IjHtJ - i 1 


HJMC TST 


PART? 


GLOBAL. ERROR REPORTING 


ROUTINE 


Id 54 








1855 








18L*6 








ias? 








J8'j3 








}8S9 








lBi 








1861 








18b^ 








1365 








1864 








186:; 








2 806 








186 7 








1668 








1860 








.18/0 








18 /* 1 








187,' 








18/J 








1874 








18/5 








1*76 


006 '3 70 

oo* .5 /o 






1877 


0065 /O 








0OftS7O 


004567 


175224 


1878 








1879 


OOo574 


012700 


000100 


1880 


00*i*jOO 


046 700 


173356 


1881 


0O6604 


001024 




180 2 








1887, 








1884 


006606 








(. 06606 


010146 






0066 J 


012746 


004116 




00t>14 


012746 


000002 




006620 


010600 






00. W 2 


104414 






006624 


062706 


000006 


188 r > 








1886 


Co 66 TO 


016702 


175160 


1887 


'■06631 








006 l,:m 


010246 






00- t.^6 


012/46 


004123 




OJvfc'l.. 1 


012746 


000002 




0w6t>46 


010600 






OObobO 


104414 






ousbt»:» 


062706 


000Q06 


188h 








1889 


00 "^6 'So 








00S6m : i 


004 736 




18^0 


006b60 
Owo-'s^O 








006660 


1Q4423 
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SEQ 4 7 



SBTTL GLOBAL ERROR REPORTING ROUTINE - ER1603 - 

THIS ERROR REPORTING ROUTINE IS USED TO PRINT OUT A BASIC ERROR 
MESSAGE. ALONG WITH A MESSAGE INFORMING THE OPERATOR WHICH TEST IS 
ABOUT TO BE ABORTED, PROVIDED EXTENDED ERROR INFOMATION HAS BEEN 
REQUESTED, OTHERWISE ONLY A "TEST FAILURE" MESSAGE WILL BE PRINTED. 



INPUTS: 



OUTPUTS 



Rl 



CONTAINS THE ADDRESS OF THE MESSAGE TO BE PRINTED. 



ERRMSG - CONTAINS THE ADDRESS OF THE MESSAGE THAT INDICATES 
THE TEST THAT IS BEING PERFORMED, EG DMA, BREAK ETC, 

MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 
"TESTNAME TEST ABORTED" 



CALLING SEQUENCE 



COMMENTS: 



INCLUOE THE LABL E "ER1603" AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



SUBORDINATE ROUTINES CALLED: NONE. 

BGNMSG ER1603 

ER1603: : 
SAVE {SAVE THE CONTENTS OF THE GPRS. 

JSR R5.PREG05 {CALL REGISTER SAVE SUBRT. 

jTRV TO CLEAR THE 

lEXT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 



MOV 


•.TBIT06.R0 


BIC 


option.ro 


BNE 


2* 



PRINTB 4EF0503.R1 



jPRINT BASIC MESSAGE ON OPERATORS CONSOLE. 



MOV ERRMSG, R2 
PRINTB 0EF1601.R2 



jbl T THE "TEST MESSAGE". 
{PRINT "TEST ABORTED" ME 



^t\ 



PASS 
ENDMSb 



{RESTORE THE CONTENTS OF THE GPR 



JSR 



PC.6KSP)* 





MOV 


Rl. CSP) 




MOV 


0EF0503, -(SP) 




MOV 


42, -CSP) 




MOV 


SP.RO 




TRAP 


CJPNTB 




ADD 


46, SP 


SSAUt. 


MOV 


R?, -(SP) 




MOV 


OEF1601, -(SP) 




MOV 


42 . - ( SP ) 




MOV 


SP.RO 




TRAP 


CJPNTB 




ADD 


46, SP 


s. 

j RETURN 


TO PREuOS SUHRT. 


L 10004: 







TRAP 



C5MSG 



J4 



C7Lhw:V) Di.Mil TUNC 1ST PART3 
GLC6KI. ERROR REPORTING ROUTINE 



UW6 
1 8? / 
1896 
1<^9 
1900 
190 J. 
1S0^ 

1904 

iw-. 

1906 

}9o; 

1)0H 
i909 
19K 

19U 
1915 
1913 
1914 



MACRO M1200 15-MAR-64 09:41 PAGE 42 
- ER7801 - 

SBTTL GLOBAL ERROR REPORTING ROUTINE - ER7801 - 

THIS 15 AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 
MESSAGE WHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER. A LINE NUMBER 
IS INCLUDED AT THE END OF THE MESSAGE. THE MESSAGE IS PRINTED ONLY IF 
EXTENDED ERROR REPORTING IS REQUESTED. 

INPUTS: Rl - ADDRESS OF THE. MESSAGE TO PRINT. 

R3 - NUMBER OF LINE ON WHICH ERROR OCCURRED. 

OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



SEQ 48 



CALLING SEQUENCE: 



LOAD THE ADDRESS OF THE MESSAGE IN Rl. 

LOAD THE LINE NUMBER INTO R3. 

INCLUOE THE LABEL "ER7801" AS THE MESSAGE POINTER 

PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: 



THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 



SUBORDINATE ROUTINES USED: NONE. 



1915 
1916 

;./U7 

^918 

; -U9 

:'.V0 
J.921 

V. S3 



*2b 



006.'^ 



00606*? 
006*70 



0C:o7.' 
00 ■• ;.7t* 
006f.74 
006676 

006 ro? 

006706 
006/10 
00671c' 

006716 

006716 
006716 



BGNMSG ER7801 



ER7801: ; 



032767 
001412 



010346 
0^0146 
012746 
C12746 
010600 
104414 
062706 



104423 



000100 173272 



EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT 0BIT06, OPTION 
BEQ 2$ 



lEXIT WITH TEST FAILURE MESSAGE IF 

I NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

jDURING THE SOFTWARE QUESTIONS. 



PRINTB 0EF780i t Ri,R3 ;PRINT THE MESSAGE.. 



004155 
OOC003 



000010 



2*; 



ENDMSG 



LlOOOtJ; 



MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



TRAP 



R3.-CSP) 

Rl.-(SP) 

OFF 7801, -CSP) 

03,-CSP) 

SP.RO 
CSPNTB 
#10, SP 



t#HSG 



I<4 



CZDHWBO DHU-11 F'UNC TST PARTS 
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1927 
1928 
1929 

I960 
1931 
193? 
1933 
1934 
1935 
1936 
1937 
1938 
1939 
1940 
1941 
194? 
1943 
1944 
1945 
1946 
194 7 
1948 
1949 
1950 
1951 
195? 
1953 
1954 
1955 

1956 

1957 

1958 
1959 
19(»0 
19b 1 
196? 
1963 
1964 
1965 



MACRO M1200 15-MAR-84 
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SECJ 49 



1966 
1967 
1968 
1969 
19/0 
1971 
19/2 
1973 
1974 



006 720 

006720 
006720 
006720 



006 724 
00673? 



006 734 
006734 
006736 
006740 
006744 
006750 
006752 
006754 

006760 
006764 
006766 
0067 7? 
006776 
007002 
007004 
007006 



032767 
001517 



010346 
010146 
01?746 
012746 
010600 
104414 
062706 

010167 
00500 r 
01?704 
010177 
017700 
011405 
040005 
04?400 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER8401 - 



; * 

! + 

I* 

{* 

;* 
j* 
I* 
:* 

i + 
i* 

* 

+ 
* 
* 

* 

* 

t* 

;♦ 

;* 



THIS ERROR 
UHICH HAVE 
IT ANALYZES THE 
AND REPORTS ANY 
AND THE PRESENT 
LINE ASSOCIATED 



REPORTING SUBROUTINE IS INTENDED TO REPORT INTERACTIONS 
BEEN FOUND BETWEEN A MODEM SIGNAL AND OTHER MODEM SIGNALS. 
MODEM STATUS WHICH IS STORED IN THE STAT STORAGE AREA 
DISCREPANCIES WHICH ARE FOUND BETWEEN THIS STORED DATA 
STATE Of THE STAT REGISTERS. SPECIFIED BITS ON THE 
WITH THE SPECIFIED LINE ARE IGNORED. 



INPUTS: 



OUTPUTS; 



Rl - ADDRESS OF SIGNAL NAME MESSAGE. 

R2 - BIT MAP OF BITS TO IGNORE ON SPECIFIED LINE. 

R3 - NUMBER OF SPECIFIED LINE. 

CSRA - CONTAINS THE ADDRESS OF THF UT CSR . 

NUMLNS • EQUATED TO THE NUMBER 0. ''NES ON THE DUT . 

FSLSA - CONTAINS THE ADDRESS OF Th JT STAT REGISTER, 

STSTB - LABEL AT BASE OF STAT STORAGE TABLE. 

TXRLNB - LABEL AT BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE 

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "FR8401 ** AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL 



COMMENTS: 



THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 



SUBORDINATE ROUTINES USED; NONE. 

I****************************************************************************** 



004567 175074 



BGNMSG ER8401 
SAVE 



JSR 



ER8401: : 
{PRESERVE THE CONTENTS Of THE GPRS. 
R5.PREG05 {CALL REGISTER SAVE SUBRT 



i EXIT THE TEST IF EXTENDEO ERROR REPORTING HAS NOT BEEN ENABLED 



000100 173230 



BIT OSIT06, OPTION 
BEQ 60$ 



{EXIT WITH TEST FAILURE MESSAGE IF 

jNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS, 



PRINTB 0EF8401,R1 4 R3 {PRINT THE BASIC MESSAGE. 



000003 

000010 

000204 

002610 
\ 73?0? 
175204 



21 



MOV 


H1.44* 


CLR 


Ri 


MOV 


0STSTB.R4 


MOV 


R1.8CSRA 


MOV 


StfSLSA.RO 


MOV 


(R4).R5 


BIC 


R0.R5 


BIC 


(R4)»,R0 



MOV R3,-CSP> 

MOV R1.-C5P) 

MOV MF.F840L, -CSP) 

MOV 03,-CSP) 

MOV SP.RO 

TRAP CIPNTB 

ADD 010, SP 

{SAVE THE ADDRESS OF THE SIGNAL NAME MESSAGE. 

{CLEAR THE LINE COUNTER. 

{SET UP STAT STORAGE POINTER TO BASE OF TABl E . 

{SET UP THE CSR IND.AQR.REG FIELD. 

{GET THE CONTENTS OF THIS LINE'S STAT REGISTER, 

{GET THE PREVIOUS CONTENTS FROM STORAGE. 



L.4 



CZOHUBO DHU-11 FUNC TST PARTS 
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19/5 

1976 
1977 
1978 
1979 
1980 
1981 
1982 
1983 
1934 
1\)65 
1986 
1987 
1988 
1989 
1990 
1991 
199? 
1993 
1994 
1995 
1996 
1997 
1998 
1999 
2000 
2001 
2002 
2003 
2004 
2005 



2006 
2007 



2009 



007010 
007012 
007016 
007022 
007024 
00/030 
007032 
007036 
007040 
007044 
007050 
007054 
007056 
007062 
007066 
007072 
007074 
007100 
007104 
007110 
007112 
007116 

007122 
007124 
007130 
007132 



007134 
007134 
007136 
007140 
007142 
007146 
007152 
007156 
007160 
007162 
007166 
0071/0 
007172 
007172 
007174 
00/174 
007174 



050005 
012700 
120163 
001002 
056600 
040005 
032705 
001404 
012702 
004 767 
032705 
001404 
012702 
004767 
032705 
001404 
012702 
004 767 
032705 
001404 
012702 
004 767 

005201 
020127 
0027 20 
000417 



010146 
010246 
010346 
016746 
012746 
012746 
010600 
104415 
062706 
000207 
000000 

004736 



104423 



043777 
003750 

000006 

100000 

005643 
000064 
020000 

00564 7 
000046 
010000 

005652 
000030 
004000 

005656 
000012 



000020 



000022 
004305 
000005 



000014 
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4$: 



6$: 



8$: 



10$: 



12*! 



MAR -84 
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BIS 


R0.R5 i 


MOV 


#43777, RO i 


CMPB 


R1.TXRLNBCR3) { 


BNE 


4* j 


BIS 


R2SL0TCSP),RO j 


BIC 


R0.R5 } 


BIT 


0BIT15.R5 j 


BEQ 


6$ ( 


MOV 


0EM8403.R2 i 


JSR 


PC, 40$ j 


BIT 


*BIT13,R5 j 


BEQ 


8$ ; 


MOV 


tfEM8404,R2 } 


JSR 


PC, 40$ j 


BIT 


0BIT12.R5 j 


BEQ 


10$ j 


MOV 


OEM8405.R2 j 


JSR 


PC, 40$ ; 


BIT 


08ITU.R5 ; 


BEQ 


12$ j 


MOV 


«EM8"06,RP ; 


JSR 


PC,40$ s 


INC 


Rl i 


CMP 


R1,0NUMLNS ; 


BLT 


2$ i 


BR 


60$ i 



SEQ 50 



XOR PRESENT AND STORED STAT VALUES. 

PREPARE TO MASK OUT UNUSED BITS. 

IS THIS LINE ASSOCIATED WITH SPECIFIED LINE? 

DON'T MASK OUT SPECIFIED BITS IF IT IS NOT. 

MASK OUT SPECIFIED BITS. 

GET BIT MAP OF UNDESIRED CHANGES, 

CHECK FOR DSR SIGNAL INTERACTION. 

SKIP PRINTING LINE IF NO DSR INTERACTION. 

SELECT DSR ERROR MESSAGE, 

PRINT THE LINE OF THE ERROR MESSAGE. 

CHECK FOR RI SIGNAL INTERACTION. 

SKIP PRINTING LINE IF NO RI INTERACTION. 

SELECT RI ERROR MESSAGE. 

PRINT THE LINE OF THE ERROR MESSAGE. 

CHECK FOR DCD SIGNAL INTERACTION. 

SKIP PRINTING LINE IF NO DCD INTERACTION. 

SELECT DCD ERROR MESSAGE. 

PRINT THE LINE CF THE ERROR MESSAGE. 

CHECK FOR CTS SIGNAL INTERACTION. 

SKIP PRINTING LINE IF NO CTS INTERACTION. 

SELECT CTS ERROR MESSAGE. 

PRINT THE LINE OF THE ERROR MESSAGE. 

SELECT NEXT LINE. 

ALL LINES DONE? 

LOOP IF NOT ALL LINES DONE. 

EXIT THIS ROUTINE. 



i * 



LOCAL ERROR MESSAGE LINE PRINTING ROUTINE, 



40$! 



PRINTX 0EF8402,44$,R3 I R2,R1 



MOV 


Rl.-(SP) 


MOV 


R2, (SP) 


MOV 


R3.-CSP) 


MOV 


44$, (SP) 


MOV 


*EF8402,-(SP) 


MOV 


OS.-(SP) 


MOV 


SP,RO 


TRAP 


CIPNTX 


ADD 


014, SP 





RTS 


PC 


44$: 


.WORD 





60*; 


PASS 





ENDMSG 



JSR 



{LOCAL STORAGE FOR ADDRESS OF SIGNAL NAME. 

; RES TORE ALL THE GPRS TO THE PRESERVED VALUES. 

PC,a(SP)t {RETURN TO PREG05 SUBRT, 



L 10006: 



TRAP 



C*MSU 



M4 
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SEG 51 



2011 
2012 
2013 
2014 
2015 
2016 
2017 
2018 
2019 
2020 
2021 
2022 
2023 
2024 
2025 
2026 
2027 
2028 
2029 
2030 
2031 
2032 

2033 

2034 
2035 
2036 
2037 
2038 
2039 



2040 
2041 
2042 
2043 
2044 
2045 
2046 
2047 
2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
205 7 
205P 
2059 



007176 
007176 
007176 
007176 

007202 
007206 
007212 

007214 
007214 
007216 
007222 
007226 
007230 
007232 
007236 
007242 
007246 
007250 
007252 
007256 
007260 



007262 
007266 
007270 
007274 
007276 
U07300 
007302 



004567 174616 



012700 
046700 
001064 



010146 
012746 
012746 
010600 
104414 
062706 
012703 
012705 
012301 
012304 
004 767 
020302 
103772 



000100 
172750 



004116 
000002 



000006 
002352 
006027 



000056 



020227 002546 

001036 

005762 000002 

001433 

012301 

011304 

012705 006057 



SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9301 - 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ANY BMP CODES 
THAT ARE FOUND IN THE BMP CODE QUEUE, TOGETHER WITH THE THE NUMBER OF 
THE TEST THAT WAS EXECUTING AT THE TIME THE BMP CODE WAS LOGGED. 
PROVIDED EXTENDED ERROR REPORTING HAS BEEN ENABLED. 

INPUTS: Rl - THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED. 
R2 - THE ADDRESS OF THE NEXT EMPTY CELL IN THE QUEUE. 

OUTPUTS: THE TEST NUMBER FOLLOWED BY THE BMP CODE ARE PRINTED AT THE 
OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUOE THE LABEL "ER9301" Pi THE MESSAGE POINTER 
PARAMETFR IN THE DIAG SUPEP ERROR REPORT MACRO CALL. 



COMMENTS: 



THE MESSAGE IS PRINTED Ab bHSIC ERROR INFORMATION. 



* SUBORDINATE RO'J "i INES USED; NONE. 

♦ ft**********-********************************* ******************&************* 



BGNMSG ER9301 
SAVE 



JSR 



MOV 
BIC 
BNE 



06IT06.R0 
OPTION. RO 
60$ 



ER9301; : 
jSAVE THF GPRS ON THE STACK. 
R5.PREG05 jCALL REGISTER SAVE SUBRT, 

jTRY TO CLEAR THE 

sEXT'D ERROR REPORTING FLAG 

jEXIT IF FLAG NOT SET. 



PRINTS 0EF0503.R1 



Rl v -CSP) 

4EF0503.-CSP) 
02, -CSP) 
SP.RO 
C$PNTB 
06, SP 



I REPORT UNEXPECTED BMP CODES FOUND. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

iGET THE START ADDRESS OF THE BMP CODE QUEUE. 

{GET THE MESSAGE TO BE REPORTED. 

{GET THE NUMBER OF THE TEST THAT WAS EXECUTING. 

jGET BMP CODE THAT WAS REPORTED OFF THE QUEUE. 

{GO REPORT THE BMP CODE. 

{CHECK IF ALL CODES HAVE BEEN REPORTED. 

j IF IT IS NOT THE LAST BMP CODE THEN LOOP. 

! CHECK IF OVERFLOW HAS OCCURRED. 

i THE CONDITIONS FOR OVERFLOW ARE: THE POINTER CONTAINS THE ADDRESS OF THE 
; LAST CELL IN THE QUEUE, AND A BMP CODE HAS ALREADY BEEN WRITTEN INTO THAT 
i CELL, 



2$: 



MOV 


0BMPCQB,R3 


MOV 


OEM9302.R5 


MOV 


CR3)*,R1 


MOV 


(R3)« ,R4 


JSR 


PC, 50$ 


CMP 


R3.R2 


BI.O 


2$ 



CMP R2,0BMPCQE-4 

f3NE 60$ 

TST 2CR2) 

BEQ 60$ 

MOV (R3)»,R1 

MOV (R3J.R4 

MOV 4EM9303.R5 



{CHECK IF THE POINTER IS AT THE LAST LOCATION 

{EXIT IF NOT AT THE LAST LOCATION. 

{CHECK FOR A BMP CODE IN THE LAST CELL 

{EXIT IF NO OVERFLOW HAS OCCURED, CELL EMPTY. 

{GET THE TEST NUMBER OFF THE QUEUE. 

{GET THE BMP CODE OFF THE QUEUE. 

{SELECT THE MESSAGE TO BE REPORTED. 



N4 
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SEQ 52 



2060 



2061 
2062 
2063 
2064 



2065 
2066 

2067 
2068 



007306 
007306 
007312 
007316 
007320 
007322 
007326 
007332 

007334 
007334 
007336 
007340 
007342 
007346 
007352 
007354 
007356 
007362 
007364 
007364 

007366 
007366 
007366 



012746 
012746 
010600 
104415 
062706 
004 767 
000414 



010446 
01014G 
010546 
012746 
012746 
010600 
104415 
062706 
000207 

004736 



104423 



004501 
000001 



000004 
000002 



004423 
000004 



000012 



50$; 



60* J 



PRINTX 


#EF9302 


{REPORT OVERFLOW CONDITION, 














MOV 


0EF93O2,- 


•CSP) 








MOV 


n t csp) 










MOV 


SP,R0 










TRAP 


C$PNTX 










ADD 


44. 5P 




JSR 


PC, 50$ 


{REPORT THE LAST BMP CODE PLACED ON THE 


QUEUE. 




BR 


60$ 


jEXIT. 








PRINTX 


tfEF9301.R5.Rl, 


,R4 ;PRINT THE MESSAGE. 


MOV 
MOV 
MOV 


R4.-C5P) 

Rl, -CSP) 
R5, -CSP) 










MOV 


0EF93O1.- 


•CSP) 








MOV 


#4, -CSP) 










MOV 


SP.RO 










TRAP 


C$PNTX 










ADD 


#12, SP 




RTS 


PC 


{RETURN. 








PASS 




{RESTORE THE GPR CONTENTS. 










JSR 


PC,5)CSP)* {RETURN 


TO PREG05 SU3RT. 




ENDMSG 




L 10007: 









TRAP 



C$MSG 



B5 
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GLOBAL SIEROUTINES SECTION 

2070 .SBTTL GLOBAL SUBROUTINES SECTION 

20 78 

20?<* 

2060 j ♦ ♦ 

2081 { THE GLOBAL SUBROUTINES SECTION CONTAINS THE. SUBROUTINES 

2082 , THAT ARE USED IN MORE THAN ONE TEST, 

2083 j-- 



C!) 
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SEQ 54 



2065 

2086 

£089 
2090 

2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 
2101 
210d 
2105 
2104 
2105 
2106 
2107 
2108 
2109 
2110 
2111 
2112 
2113 

2114 
2115 

2116 
2117 
2118 
2119 
2120 
2121 
2122 
212* 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2154 
2135 
2136 
2137 
2138 
2139 
214Q 



007370 
007370 



007374 
007376 
007400 
00740c! 



007406 
007410 
00741? 
007414 
007420 
007422 
007424 
007426 
007430 
007432 
007434 



SBTTL GLOBAL SUBROUTINE 

************ 



- ALTFLD 



************************************************************** 
ALTER DEVICE REGISTER FIELDS ROUTINE - 
THIS SUBROUTINE ALTERS THE SPECIFIED FIELO OF THE SPECIFIED DEVICE 
REGISTER FOR THE SPECIFIED LINES. THIS ROUTINE CAN BE USED TO SET 
OR CLEAR BITS WITHIN SELECTED FIELDS OF SELECTED REGISTERS. 
USE EXAMPLES* SET RX.BAUO.RATE FIELDS ON LINES 3 AND 6. 

CLEAR TX.DMA BITS ON ALL LINES. 



INPUTS : 



OUTPUTS: 



Rl - ADDRESS OF THE REGISTERS TO ALTER. 

R2 - BIT FIELDS SET TO DESIRED STATES. 

R3 - BIT MAP OF LINES FOR WHICH TO ALTER REGISTER. 

R4 - MASK OF BITS TO ALTER Cl INDICATES CHANGE BIT). 

CSRA - CONTAINS THE ADDRESS OF THE DEVICE CSR. 

IESTAT • SAVED STATES OF THE INTERRUPT ENABLE BITS. 

DEVICE REGISTERS - SPECIFIED REGISTER FIELDS ALTERED. 
CSR IND.ADR.REG FIELD - DESTROYED. 



CALLING SEQUENCE: 



JSR 



PC, ALTFLD 



COMMENTS: THIS ROUTINE READS THE SPECIFIED REGISTERS FOR ALL LINES 

WITH NUMBERS LOWER THAN THE HIGHES SPECIFIED LINE. 

THIS ROUTINE HOES NOT READ THE CSR. 

SUBROUTINES CALLED: NONE. 



004567 174424 



ALTFLD:: SAVE 



jSAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBRT. 



010400 
005100 
040002 
016705 172622 



SET UP TO LOOP FOR EACH LINE.: 

PREPARE THE UORD TO BE ORED INTO THE REGISTER CONTENTS. 
SET UP THE WORD TO WRITE INTO THE. INO.ADR.REG FIELD OF THE 



CSR. 



MOV 


R4,R0 


COM 


RO 


BIC 


R0.R2 


MOV 


IESTAT, R5 



jCALCULATE THE NEW CONTENTS OF THE 

I REGISTER FIELDS WHICH ARE TO BE 

I ALTERRED Bl THIS ROUTINE, 

iSET UP TO WRITE INO.ADR.REG FIELD TO 0. 

LOOP ONCE FOR EACH LINE, ALTERING THE SPECIFIED FIELD IN THE SPECIFIED 
REGISTER IF THE LINE HAS BEEN SELECTED FOR ALTERING. 

EXIT THE LOOP IF NO MORE LINES TO ALTER, OR IF Wt HAVE ALTERED THE. MAX 
ALLOWABLE NUMBER OF LINES CAS SPECIFIED BY NUMLNS). 



000241 
006003 
103006 
010577 
011100 
040400 
050200 
010011 
005205 
005/05 
001365 



2$: 



172560 



4*i 



CLC 




ROR 


R5 


BCC 


4$ 


MOV 


R5.WCSRA 


MOV 


(Rl ),R0 


BIC 


R4.R0 


BIS 


R?,RO 


MOV 


R0.CR1) 


INC 


R5 


TST 


R3 


UNE 


2* 



jPREPARE 
»GET THE 



FOR ROTATE, 
LINE. SELECT 



"TST R5" DOES THIS BELOW 
BIT FOR THIS LINE, 



{SKIP SETUP IF LINE IS NOT SELECTED. 

iSET OUT CSR INO.ADR.REG FIELD TO THIS LINK 

iGET THE PRESENT CONTENTS OF THE REG TO ALTER 

(CLEAR THE BIT FIELDS WE ARE TO ALTER. 

jOR IN THE NEW STATES OF THE FIELDS. 

iWRITE THE NEW REGISTER CONTENTS TO THE REG. 

i SET I INE NUMBER TO THE NEXT LINE. 

I CHECK FQR IINHANDLED LINES, CLEAR CARR> ►l.AU, 

{LOOP IF SELECTED LINUS) IS NOT HANDLED* 



D r ) 
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^EQ 55 



2141 

2142 C07456 

007456 

^143 007440 



00473b 
000207 



00$ i 



PASS 
RTS 



PC 



iRFSTORE GPRS. 
J5R PC.SCSP)* 

l RETURN TO CALLING 



i RETURN 
RUUTNb, 



TO PRCG05 SUBRT 



CZDHWfiO DHL'- 11 f- UNC TST 
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PART3 


2145 








2146 








214 7 








2148 








2149 








2150 








2151 








2152 








2153 








2154 








2155 








2156 








2157 








2156 








2159 








2160 








2161 








2162 








2163 








2164 








2165 








2166 








2167 








2166 








2169 








2170 


007442 








007442 


004567 


174352 


2171 


007446 


126727 


172522 


2172 


007454 


001411 




2173 








2174 








2175 








2176 


007456 


005005 




2177 


007460 


010565 


003710 


2178 


007464 


005205 




2179 


007466 


005205 




2160 


007470 


020527 


000040 


2181 


007474 


002771 




2182 


007476 


000411 




2183 








2184 








2185 








2186 


007500 


012701 


003770 


2187 


007504 


012702 


003710 


2188 


007510 


112122 




2189 


007512 


105022 




2190 


007514 


020227 


003750 


2191 


007520 


002773 




2192 








2193 








2194 








2195 


007522 


012701 


003710 


2196 


007526 


012702 


003750 


2197 


007532 


012103 




2198 


007534 


OO620J 




2199 


007536 


110322 




2200 


007540 


020127 


003750 



MACRO M1200 
- ASLNTL - 



15-MAR-84 09:41 
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SEQ 56 



SBTTL GLOBAL SUBROUTINE - ASLNTL - 

**************************************«*******************A*******A******** 

- SETUP ASSOCIATED LINE NUMBER TABLES ROUTINE - 
THIS ROUTINE SETS UP THE TWO TABLES WHICH ARE CONTAIN INFORMATION 
ABOUT THE TX/RX LINE WHICH IS ASSOCIATED WITH A PARTICULAR RX/TX 
LINE. ONE TABLE IS A TABLE OF WORDS WHICH CONTAINS WORD OFFSET 
VALUES AND THE OTHER TABLE IS A TABLE OF BYTES WHICH CONTAINS 
LINE NUMBER VALUES. 

INPUTS! LOPBCK - STORAGE FOR THE TYPE OF LOOPBACK ON THE DUT. 

NUMLNS - EQUATED TO THE NUMBER OF LINES ON THE DUT. 

STGTRB - LABEL AT BASE OF STAGGERED LINE ASSOCIATION TBI. . 

TXRLN6 - LABEL AT BASE OF BYTE TX/RX LINE NUMBER TABLE. 

TXRXLB - LABEL AT BASE OF WORD TX/RX LINE NUMBER TABLE. 

TXRXLE - LABEL AT END OF WORD TX/RX LINE NUMBER TABLE. 

OUTPUTS: TXRXL, TXRLN - TABLES INITIALIZED FOR SELECTED LOOPBACK. 

CALLING SEQUENCE: JSR PC, ASLNTL 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE. 

**** * * * ♦ ♦ *** * * **+ * ** **** *** * * ♦ * * *********** * * * **♦ * ******** ****** * * ** * **** * * 



000002 



ASLNTL:: SAVE 

CMPB 
BEQ 



JSR 
LOPBCK, 02 
4$ 



;SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 ;CALL REGISTER SAVE SUBRT. 
j TEST FOR STAGGERED LOOPBACK. 
{GO SET UP STAGGERED TABLE IF STAGGERED LPBCK 



j CLEAR THE LINE COUNTER 
»SET UP A WORD OF THE TABLE. 



i SET UP THE WORD TABLE FOR NON-STAGGERED LOOPBACK. 
t - 

R5 
2*: MOV R5.TXRXLBCR5) 

R5 

R5 

R5.02+NUMLNS 

2t 

8$ 



CLR 
MOV 
INC 
INC 
CMP 

BLT 

BR 



j SET LINE COUNTER TO NEXT LINE OFFSET. 
{TEST FOR ALL LINES DONE. 
lLOOP UNTIL ALL LINES DONE. 
{GO SET UP THE BYTE TABLE. 



i * 



j SET UP THE WORD TABLE FOR STAGGERED LOOPBACK, 



4$: MOV 0STGTRB.R1 

MOV 0TXRXLB.R2 

6$: MUVB (Rl)»,(R2)» 

CLRB (R2)f 

CMP R2.0TXRXLE 

BLT b% 



j SET UP THE SOURCE POINTER. 

sSET UP THE DESTINATION POINTER. 

I MOVE A BYTE INTO THE TABLE. 

i CLEAR THE UPPER BYTE OF WORD TABLE ENTRY 

{COMPARE POINTER WITH END ADR OF TABLE. 

(LOOP IF NOT AT END YET, 



j SET UP THE BYTE TABLE BASED ON THE WORD ASSOCIATION TABLE 



8*: MOV OTXRXLB.RL 

MOV GTXRl.N6.R2 

10$: MOV (R1)*,R3 

ASR R3 

M0V8 R3,C<2)» 

CMP Rl.ifXRXLE 



,SET UP THE SOURCE POINTER. 

jSET UP THE DESTINATION POINTER. 

iGFT THE WORD OFFSET VALUE FROM WORD TABLE, 

iDIVIOE BY 2 TO GET LINE NUMBER VALUE. 

j LOAD THE BYTE LINE NUMBER INTO TABLE. 

jCOMPARE SOURCE POINTER WITH ADR OF TABLE END 
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F5 


MACRO M1200 
- ASLNTL - 


15-MAR-84 09:41 
BUT 10$ 


PAGE 47-1 


60$ j 


PASS 

RTS PC 


JSR 



2201 007544 002/72 BLT 10$ {LOOP IF NOT AT END OF TABLE YET, 

2202 

2203 007546 60$: PASS i RESTORE GPRS. 
007546 004736 JSR PC.SCSP)* iRETURN TO PREG05 SU8RT. 

2204 007550 000207 



G5 



&M°sP^o6Ur 



TST PART3 
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SEQ 58 



2207 
2208 

2209 
2210 
2211 
2212 
221? 
2214 
2215 
2216 
2217 
2213 
2219 
2220 
2221 
2222 
2223 
2224 
2225 
2226 
2227 
2228 
2229 
2230 
2231 
2232 
2233 
2234 

2235 
2236 
2237 
2 >38 
2239 
2240 
2241 
2242 
2243 
2244 
2245 
2246 
2247 
2248 
2249 
2250 
2251 
2252 
2253 
2251 
2255 
2256 
225 7 
2258 
2259 
2260 



007552 
007552 
007556 



007566 
007570 
007576 
007602 
00 7604 
007606 
007610 
007612 



00 76L4 
007620 
007622 



004567 
005067 



17A242 
000210 



007562 012705 000001 



005000 
012767 
005767 
001410 
005200 
001373 
005305 
003371 



005067 
000241 
000461 



000001 
172464 



172470 



172444 



.SB 

i ♦ ♦ 

i* 

{♦ 

; + 

{* 

j* 

{* 

* 

+ 

* 

* 

* 
* 

* 



TTL GLOBAL SUBROUTINE - CALMSL 

- CALIBRATE MILLI SECOND LOOP COUNT SUBROUTINE - 
THIS SUBROUTINE CALIBRATES THE TIMING LOOP WHICH IS USED IN THE MSLOOP 
ROUTINE, THIS SUBROUTINE CALCULATES A VALUE FOR THE MSLCNT VARIABLE 
WHICH IS THE NUMBER OF SOFTWARE LOOPS WHICH TAKES 1 MS TO EXECUTE IN 
THE MSLOOP ROUTINE. THIS ROUTINE CALIBRATES T HE COUNT BY USING THE 
LINE TIME CLOCK (LTC), SO IF NO LTC IS AVAILABLE THE DEFAULT VALUE FOR 
THE DELAY COUNT MUST BE USED. 



INPUTS} 



OUTPUTS: 



MSLCNT - DEFAULT 1 MS DELAY LOOP COUNT VALUE, OR 

VALUE FROM PREVIOUS CALIBRATION. 
MSTICK - NUMBER OF MS PER LTC CLOCK TICK, 

TIMER1 - TIMER COUNTER CHANGED BY LTC INTERRUPT SERVICE RTN. 
CLKHRZ - NUMBER OF LTC CLICKS PER SECOND (50 OR 60). 

CARRY - SET IF LTC IS AVAILABLE, AND NEW CALIBRATION PERFORMED 
MSLCNT - NEW 1 MS DELAY LOOP COUNT VALUE IF LTC AVAILABLE, OR 
UNCHANGED IF NO LTC IS AVAILABLE. 



CALLING SEQUENCE: 
COMMENTS.* 



JSR 



PC, CALMSL 



* SUBORDINATE ROUTINES CALLED: UNSDIV.OOPS. 



JSR 



CALMSL ss SAVE 

CLR 62$ 
\ SYNCHRONIZE WITH THE LTC. 



I SAVE CONTENTS OF GPRS RO THRU R5 
R5.PRFG05 {CALL REGISTER SAVE SU8RT, 
iCLEAR THE 2ND TIME FLAG. 



2$: 



4$: 



MOV 



CLR 
MOV 
TST 
BEQ 
INC 
BNE 
DEC 
BGT 



n. R5 



{SET OUTER LOOP COUNTER TO 1 LOOP. 
S INCREASE THE VALUE LOADED INTO THIS COUNTER IF THE 
{FOLLOWING LOOP TAILS ON FUTURE. FASTER PROCESSORS. 

RO j CLEAR TJ-.E I AIT FOR CLOCK INT COUNTER. 

Ol.TIMERl ,SET UP COJ\l OF 1 TO SYNCH WITH LTC. 

TIMER1 jCHECK FOR COUNTER HAVING GONE TO ZERO. 

6$ j JUMP OUT IT LOOP IF LTC HAS INTERRUPTED. 

RO {COUNT T HT-i ITERATION OF THE INNER LOOP. 

4$ {LOOP IF ''.OUNTF.R HAS NOT TURNED OVER. 

R5 iDECM-MtM THE INNER LOOP COUNTER. 

4$ {LOOP I^ OUTER LOOP COUNT NOT UP. 






IF WF. GOT NO LTC INTERRUPT, INDICATE 
LTC MUST BE FLAKE Y, OR NOT REALL* AN 



THAT THERE 
LTC AT ALL 



IS NO LTC AVAILABLE 



007624 012704 002266 



I 



WE ARE 
SET UP 



6*: 



CLR 
CLC 
UR 

NOW 
FOR 

MOV 



CLKHRZ 

60$ 



L TC 



{CLEAR LTC FREQUENCY WORD TO INDICATE NO 

{INDICATE FAILURE FOR RETURN. 

{BYPASS THE FOLLOWING CALIBRATION PROCEDURES 



SYNCHRONIZED WITH THE 
THE CALIBRATION LOOP. 



LTC 



0TIMER1.R4 



{WILL TEST TIMERl IN THE LOOP BELOW. 



Sffi 
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SEQ 59 



2262 
2263 

2264 
2265 
2266 
226 7 
2268 
2269 
2270 
2271 
2272 
2273 
22 74 
2275 
2276 
2277 
2278 



oi 



80 



2282 
2263 
2284 
2285 
2286 
2287 
2288 
2239 
2290 
2291 
2292 
2293 
2294 
2295 
2296 
229 7 
2298 
2299 
2300 
2301 
2302 
2303 
2304 
2305 
2306 
230/ 
2308 

2310 

2311 

2312 
2314 
2314 



007630 
007632 
007634 
007636 

007642 
007646 
007650 
007654 
007656 
007660 
007662 
007664 
007b66 
007670 
007672 
007674 



005001 
005002 
005C03 
012714 000001 



007700 
007702 
007 706 
007710 
007712 
00771* 
007716 
007720 
007722 
007724 
007726 



007 730 
007/34 
007 736 
007740 
00 7 744 
007 746 
007 752 
00 7 756 
00 7 762 
007 764 

00 7 766 
00 7 766 
007 7 70 

00 / * /2 
007774 



016705 
011400 
010067 
040200 
020003 
000261 
001406 
005305 
001367 
005301 
001363 
004 767 



005401 
016/02 
010203 
160502 
010204 
005005 
005301 
100403 
060304 
005505 
000773 



016701 
010403 
010502 
004 767 
103402 
004767 
010167 
00516 7 
001277 
000261 



004 7 36 

00020 / 
oooooo 

000000 



172432 
000120 



000432 



172372 



172342 



001200 

000360 
172322 
000010 



8$: 
10$: 



CLR 

CLR 
CLR 
MOV 

MOV 
MOV 
MOV 
BIC 
CMP 
SEC 
BEQ 
DEC 
BNE 
DEC 
BNE 
J5R 



Rl 
R2 
R3 
01.CR4) 

MSLCNT.R5 

(R4),R0 

R0,64$ 

R2.R0 

R0.R3 

12$ 

R5 

10$ 

Rl 

8i 

PC, OOPS 



i UF. HAVE NOW HAVE LOOP COUNT 
s WE HAVE NEGATIVE OF NUMBER 
: WE HAVE THE PORTION OF THE 
; NOW WE CALCULATE THE TOTAL 



12$: 


NEG 


Rl 




MOV 


MSLCNT.R2 




MOV 


R2,R3 




SUB 


R5.R2 




MOV 


R2,R4 




CLR 


R5 


14$: 


DEC 


Rl 




BMI 


16$ 




ADD 


R3.R4 




ADC 


R5 




BR 


14$ 


i DIVIDE THE TOTAL NUMBER 


16$: 


MOV 


MSTICK.R1 




MOV 


R4,R3 




MOV 


R5.R2 




JSR 


PC.UNSDIV 




BCS 


18$ 




JSR 


PC, OOPS 


16$: 


MOV 


Rl.MSLCNT 




COM 


62$ 




BNE 


2$ 




SEC 




60$: 


PASS 


■ 




RTS 


J 
PC 


62$: 


.WORD 





64 $i 


.WORD 






CLEAR THE OUTER LOOP COUNTER. 
INDICATE TO CHECK ALL BITS OF TIMER1, 
INDICATE TC CHECK FOR TIMERl CLEAR. 
LOAD TIMERl WITH COUNT OF 1. 

LOAD MS LOOP COUNT. 

GET THE TIMERl VALUE. 

SAVE WORD CLIKE IN THE. REAL LOOP). 

LEAVE ALL THE BITS. 

COMPARE AGAINST ZERO. 

SET CARRY IN CASE OF SUCCESS. 

EXIT LOOP IF TIMERl HAS CLEARED. 

COUNT DOWN THE INSIDE MS LOOP COUNT. 

LOOP IF MS NOT UP. 

DECREMENT THE MS TIME COUNT. 

KEEP LOOPING. 

WE OVERFLOWED, SOMETHING IS WRONG, ABORT. 

INFORMATION FOR ONE CLOCK TICK. 
OF OUTER LOOPS IN Rl, EACH IS MSLCNT INNER LOOPS. 
LAST OUTER LOOP NOT EXECUTED. IN R5. 
NUMBER OF INNER LOOPS EXECUTED. 

GET NUMBER OF OUTER LOOPS. 

GET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 

COPY NUMBER OF LOOPS FOR MULTIPLY, 

CALC * OF INNER LOOPS DONE IN LAST OUTER LOOP 

ANO ADD TO ACCUMULATOR LSWORD. 
CLEAR ACCUMULATOR MSWORD. 
CHECK Rl FOR CONDITION 

SKIP MULTIPLICATION IF ZERO 
MULTIPLY NUMBER OF INNER 

LOOPS PER OUTER LOOP 3Y 
;NUM6ER OF OUTER LOOPS PERFORMED. 

OF INNER LOOPS BY THE NUMBER OF MS PER L.TC TICK. 

\Q OF MS PER LTC TICK IS DIVISOR. 

5 LSWORD OF LOOP COUNT IS LSUORD OF DIVIDEND. 

j MSWORD OF LOOP COUNT IS MSWORD Of DIVIDEND. 

iDIVIDE NUMBER OF LOOPS BY MS PER LVC TICK. 

I BYPASS OOPS IF WE'RE OK. 

s CLOCK ROUTINES ARE NOT LONG ENOUGH, OR BUG. 

(SET NEW VALUE. FOR MS LOOP COUNT . 

jSEf THE 2ND ITERATION FLAGS IK 1ST ITERATION, 

{BRANCH IF ONLY ONE ITERATION DONE. 

{ SET THE SUCCESS FLAG FOR EXIT. 



« RESTORE GPRS, 

pc.acsp)* 

X CARRY - SUCCESS 



; RE TURN TU PREG05 SU6RT, 
FLAG. SET IF SUCCESS, 



j 2ND CALIBRATION IThHAUON fLAtfS. 

j DUMMY WORD FOR STORAGE OF THE READ WORD, 



CZOHWBO 
GLOBAL ^ 


DHU 11 
UHROUTI 


* UNC TST 


PARTS 


NE 




2316 








251 / 








2318 








231* 








2320 








2321 








?rn 








C ->«_4. 








2323 








2324 








2325 








2326 








232/ 








2328 








232^ 








2330 








2331 








2332 








2333 








2334 








2335 








2336 








2337 








2336 








2339 


007776 








007776 


004567 


174016 


2340 


010002 


005067 


172244 


2341 


010006 


011011 




2342 


010010 


005767 


172236 


2343 


010014 


000261 




2344 


010016 


001401 




2345 


010020 


000241 




2346 


010022 








010022 


004 7 36 




2347 


010024 


000207 





MACRO M1200 
CKTRAP 



IT; 
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SEQ 60 



.SBTTL GLOBAL SUBROUTINE - CKTRAP - 

+ **.**** +* + i* + + *** + + + + + + + + * + + + + * + + + + + + + + ± + + * + + +. + + 4. + ***$4, + + + + + + 4.** + mm L *m + ** 

♦ CHECK TRAP ROUTINE - 

♦ THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP (004 TRAP) 

♦ WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT MEMORY OR I/O LOCATION. 

♦ IF THE TRAP DOES NOT OCCUR, THIS ROUTINE RETURNS A SUCCESS INDICATION. 

* 

RO - SOURCE ADDRESS FOR MOVE. 

Rl • DESTINATION ADDRESS FOR MOVE. 

(RO) - SOURCE FOR THE MOVE. 



* INPUTS: 

• * 

{ + 

* OUTPUTS; 

* CALLING SEQUENCE; 



(Rl) - WRITTEN TO THE CONTENTS 0^ (RO). 

CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED. 

TP4FLG - NONZERO IF TRAP OCCURRED, CLEARED OTHERWISE. 



JSR 



PC. CKTRAP 



♦ COMMENTS; IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADDRESS WHICH 

♦ IS LABELED ADRPTR WILL BE THE TRAP PC ADDRESS ON THE STACK. 
{ + 

;* SUBORDINATE ROUTINES CALLED; NONE. 



CKTRAP;; SAVE 





JSR 


Ci. R 


TP4FLG 


MOV 


(RO).CRl) 


ADRPTR;; TSi 


TP4FLG 


SEC 




BEQ 


60$ 


CLC 




60$; PASS 





RTS 



PC 



JSR 



;SAVE CONTENTS OF GPRS RO THRU R5 . 

R5.PREG05 {CALL REGISTER SAVE SUBRT. 

{CLEAR THE 004 TRAP FLAGS. 

i PERFORM THE MOVE IN QUESTION. 

j CHECK FOR OCCURENCE OF TRAP. 

j INDICATE SUCCESS. 

lEXlT WITH SUCCESS IF TRAP DID NOT OCCUR. 

{INDICATE FAILURE. 

{RESTORE GPRS. 

PC.cXSP)* {RETURN TO PREG05 SUBRT 



CZDHWBO 0HU11 rUNC TST PART3 
GLOBAL SUBROUTINE 

2349 
2350 
2351 
2352 
2353 
2354 
2355 
2356 
2357 
2358 
2559 
2360 
2361 
2362 
2363 
2364 
2365 
2366 
2367 
2368 
2369 
23/0 
2371 
2372 
23 73 



MACRO M1200 
- CLNRST - 
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SEQ 61 



2375 
2376 
2377 

2378 

2379 
2380 
2381 
2382 
2383 
2384 
2385 
2386 
2387 
2388 
2389 
2390 

2.W 
£392 



010026 
010026 



010032 
010036 



004567 1737b6 



004 76 7 
L03002 



000604 



010040 004767 000514 



010044 
010044 
010044 



004 736 



.SBTTL GLOBAL SUBROUTINE - CLNRST - 

}*****+*************♦******#**#**♦*♦********+***+****+++*+**********++*+****++* 

}* - CLEAN RESET OF THE DEVICE UNDER TEST - 

} * THIS SUBROUTINE IS USED TO RESET THE OUT TO A KNOWN STATE. 

j* THE DUT'S SELF -TEST IS SKIPPED, AND THE FIFO IS PURGED OF ANY ERROR 

j+ CODES, ETC. 

;♦ IF THE RESET DOES NOT SUCCESFULLY COMPLETE, THEN THE CARRY BIT IS 

;* PASSED BACK TO THE CALLING ROUTINE (CLEAR). 

j * 

CSRA - CONTAINS THE ADDRESS OF THE CSR 

TXBFCA - CONTAINS ADDRESS OF OUT DMA BUFFER COUNT REGISTER. 

ERRNBR - ERROR NUMBER FOR POSSIBLE ERROR REPORT. 

ERRTBL- ERRTYP.ERNBR.AND ERRMSG SET UP CORRECTLY. 



j* INPUTS; 

{* 

{* 
{♦ 

;♦ OUTPUTS: 

{* 

j + 

;* 

j* 

i* 

1+ CALLING SEQUENCE: 

: + 



THE OUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED, 

ERRBLK - VALUE MAY BE DESTROYED. 

IESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED. 

TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 



JSR 



PC, CLNRST 



j* COMMENTS; THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS ERRNBR. 
{♦ THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 

;* 

:* SUBORDINATE ROUTINES CALLED: DELAY .MSLGET .PUFIFO.RESETT . 



CLNRST:: SAVE 



j SAVE CONTENTS OF GPRS RO THRU R5 . 
JSR R5.PREG05 {CALL REGISTER SAVE SUBRT. 



RESET THE DUT, 
THIS ROUTINE REPORTS ERRORS WITH NUMBERS FROM ERRNOR THRU ERRNBR ^2. 



JSR 
BCC 



PC.RESETT 
60$ 



jRESET THE DUT TO A KNOWN STATE. 

;EXIT ROUTINE WITH ABORT TEST INDICATOR, 



PURGE THE FIFO OF ERROR CODES, SAVE ANY BMP CODES FOUND. 
JSR PC.PUFIFO j PURGE THE FIFO. 



60$: 



010046 000207 



PASS 
RTS 



PC 



{EXIT THE TEST USING RESETT OR PUf'IFO STATUS, 
{RESTORE GPRS, PASS THE FOLLOWING INTACT: 
JSR PC.aCSP)* j RETURN TO PREG05 SUBRT. 

{CARRY BIT: IF CLEAR, THEN ABORT THE TEST. 



I<5 



CZQHWBO 
GLOBAL. S 


DHU-U HJNC TbT 
.UBROUTINE 


PART 3 


2394 








2395 








2396 








2397 








5398 








2399 








2400 








2401 








240c 1 








2403 








2404 








2405 








2406 








240? 








2408 








2409 








2410 








2411 








2412 








2413 








2414 








2415 








2416 








2417 








2418 


010050 








010050 


004567 


173744 


2419 


010054 


005003 




2420 


010056 


012704 


002610 


2421 


010062 


010377 


172112 


2422 


010066 


017700 


172114 


242? 


010072 


011405 




2424 


010074 


040005 




2425 


010076 


042400 




2426 


010100 


050005 




2427 


010102 


012700 


043777 


2428 


010106 


120301 




2429 


010110 


001001 




24 30 


010112 


050200 




2431 


010114 


040005 




2432 


010116 


001006 




2433 


010120 


005203 




24 34 


010122 


020327 


000020 


2435 


010126 


002755 




24 36 


010130 


000261 




24 37 


010132 


000401 




24 38 








2439 


010134 


000241 




2440 








2441 


010136 








010136 


001736 




2442 


010X40 


00020V 





MACRO M1200 
- CMPMST - 
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SEQ 62 



SBTTL GLOBAL SUBROUTINE - CMPMST - 

» - COMPARE MODEM STATUS ROUTINE - 

THIS ROUTINE IS USED TO COMPARE THE PRESENT MODEM STATUS AGAINST THE 



MODEM STATUS WHICH IS STORED IN THE MODEM STATUS STORAGE TABLE. 
IGNORES THE STATES OF THE SPECIFIED SIGNALS ON A SPECIFIED LINE 

Rl - LINE NUMBER OF SPECIFIED LINE. 

R2 - BIT MAP OF BITS TO IGNORE ON SPECIFIED LINE. 



+ 

* 

* INPUTS : 

* 
+ 

+ 

* 

* OUTPUTS 

* CALLING SEQUENCE: 

* COMMENTS: 

* SUBORDINATE 



IT 



CSRA - 

NUMLNS 

FSLSA 

STSTB 

TXRLND 



CONTAINS THE ADDRESS OF THE DUT CSR. 

- EQUATED TO THE NUMBER OF LINES ON THE DUT. 
CONTAINS THE ADDRESS OF THE DUT STAT REGISTER. 
LABEL AT BASE OF STAT STORAGE TABLE. 

- LABEL AT BASE OF TX/RX LINE NUMBER ASSOCIATION 



TABLE 



CARRY - SUCCESS FLAG (SET IF NO DISCREPANCIES WERE FOUND) 



JSR 



PC, CMPMST 



ROUTINES CALLED: NONE 



i**********.********.*,****.**********,*,*.*********. it***.*******************.*****.* 



CMPMST:: SAVE 



2$: 



10$ 



50*: 
60 J; 



CLR 
MOV 
MOV 
MOV 
MOV 
BIC 
BIC 
BIS 
MOV 
CMPB 

BNE 
BIS 
BIC 

BNE 
INC 
CMP 

BLT 
SEC 

BR 

CL.C 
PASS 
RTS 



JSR 
R3 

0STSTB.R4 
R3.QCSRA 
8FSLSA.R0 
(R4),R5 
R0,R5 
(R1)*,R0 
R0.R5 
C43777.RO 
R3.R1 
10$ 
R2.R0 
R0.R5 
50$ 
R3 

R3.0NUMLNS 
2$ 

60$ 



j SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 {CALL REGISTER SAVE SUBRT, 

} CLEAR THE LINE COUNTER. 

j SET UP STAT STORAGE POINTER TO BASE OF TABLE, 

;SET UP THE CSR IND.ADR.REG FIELD. 

{GET THE CONTENTS UF THIS LINE'S STAT REGISTER, 

{GET THE PREVIOUS CONTENTS FROM STORAGE. 



iXOR PRESENT AND STORED STAT VALUES. 

;PREPARF TO MASK OUT UNUSED BITS. 

{TEST FOR THIS BEING SPECIFIED LINE. 

{DON'T MASK OUT SPECIFIED BITS IF IT IS NOT 

{MASK OUT SPECIFIED BITS. 

{GET BIT MAP OF UNOESIRED CHANGES. 

{EXIT WITH FAILURE IF CHANGES OCCURRED. 

{SELECT NEXT LINE. 

{ALL LINES DONE? 

{LOOP IF NOT ALL LINES DONE. 

{INDICATE SUCCESS. 

;£.XIT THIS ROUTINE WITH SUCCESS. 



PC 



JSR 



{INDICATE FAILURE, 

{RESTORE GPRS. 

PC t 5)(SP)f 

: CARRY - SUCCESS FLAG 



iRFTURN TO PRFG05 SUBRT 
(SET IF SUCCESS). 



CZDHWBO OHU-11 P'UNC TST PART3 
GLOBAL SUBROUTINE 

2444 
2445 
2446 

244 7 
2448 
2449 
2450 
2451 
2452 
2453 
2454 
2455 
2456 

245 7 
2458 
2459 
2460 



2461 
2462 

2463 
2464 
2465 
2466 
2467 
2468 
2469 
2470 

24 71 

24 72 
2475 



010142 
010142 
010146 
010150 
010154 
010156 
010162 
010166 
010170 
010174 
010174 
010176 



004567 
010401 
012702 
005003 
012704 
004767 
103002 
004 767 

004 736 
000207 



MACRO M1200 
- DELAY - 
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PAGE 52 



SEG 63 



.SBTTL GLOBAL SUBROUTINE - DELAY - 

- DELAY SUBROUTINE - 
THIS SUBROUTINF. IS USED TO DELAY A VARIABLE NUMBER OF MILLI -SECONDS. 



INPUTS: 



R4 - CONTAINS THE NUMBER OF MS TO DELAY. 
MSLCNT. 



OUTPUTS: NONE. 
CALLING SEQUENCE: 



JSR 



PC. DELAY 



COMMENTS: IF NO HARDWARE CLOCK INTERRUPTS ARE OCCURING, CONTROL -CS WILL 
NOT BE HONORED FOR THE DURATION OF THE DELAY. 

SUBORDINATE ROUTINES CALLED: NONE. 

*. + + + ** + + + + + * + + + * + + + + + + + *.i>++ + +. + * + +. + + 4.+ + *+. + *. + +. + 4.+.*.+,+ +.±+± + *+. + + **t, + + *. + + * + * + + + + + + + 



173652 

177777 

010200 
000130 

000136 



DELAY:: SAVE 



010200 177777 



60$ 



62$ 





JSR 


MOV 


R4.R1 


MOV 


•-1.R2 


CLR 


R3 


MOV 


062$,R4 


JSR 


PC, MSLOOP 


BCC 


60$ 


JSR 


PC, OOPS 


PASS 


1CD 


RTS 


Jim 
PC 


.WORD 


-1 



.SAVE CONTENTS OF GPRS RO !HRU R5 . 

R5.PREG05 jCALL REGISTER SAVE SU8RT. 

jPASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 

jTELL MSLOOP ROUTINE TO CHECK ALL BITS. 

;TELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 

;TELL MSLOOP TO CHECK DU1MY NON-ZERO WORD. 

{DELAY THE REQUESTED * OF MS. 

jEXIT ROUTINE IF WE TIMED-OUT.] 

8 IK NO TIME OUT, BAD PROGRAM OR HOST MACHINE, 

{RESTORE GPRS. 

PC,QCSP)» {RETURN TO PREG05 SUBRT. 



j DUMMY, NON-ZERO WORD, 



CZDHWBO DHU-11 FUNC TST PART.!! 
GLOBAL SUBROUTINE 



24 75 
24 76 

2477 
24/6 
2479 
2480 
2481 
2482 
2483 
2484 
2485 
2486 
248 7 
2488 
2489 
2490 
2491 
2492 
2493 
2494 
2495 
2496 
2497 
2498 
2499 
2500 
2501 
2502 
2503 
2504 
2505 
2506 
2507 
2508 
2509 
2510 
2511 
2512 
2513 



MACRO M1200 
- MSLGET - 
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^EQ 64 



2514 
2515 
2516 
2517 
2518 
2519 
2520 
2521 
2522 
2523 
2524 
2525 
2526 
252/ 
2528 
2529 
2530 



010202 
01020c 



010206 
010210 



010212 
010214 
010216 

010220 
010224 
010226 
010230 
010232 



004567 173612 



005102 
040203 



005701 

001011 

011400 

01006 7 000070 

040200 

02000? 

000261 

001420 



SBTTL GLOBAL SUBROUTINE - MSLGET - 

********************************************** ******************************** 

- MILLI SECONOS LOOP WHICH RETURNS READ WORD AND REMAINING TIME - 

THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE, IT IS USED 

TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 

CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 

DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI-SECONDS. 

THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

ROUTINE AND THEN ONCE EACH MILLI -SECOND THERE AFTER. 

UPON RETURN, THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION 

IS RETURNED BY THIS SUBROUTINE. 



+ 

* 

* 
* 
* 

* 

+ 

* INPUTS: 

* 

* 
+ 



OUTPUTS: 



Rl - TIME-OUT VALUE IN MILLI-SECONDS (UP TO 64K MS). 

R2 - BIT MAP OF BITS TO TEST CI INDICATES TO TEST THE BIT). 

R3 - DL3IRED STATES OF THE INDICATED FIELDS IN R2. 

R4 - ADDRESS OF THE WORD TO TEST. 

MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

RO - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 

Rl - REMAINING NUMBER OF MS IN TIME-OUT TIME. 

CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME-OUT) 



* CALLING SEQUENCE: 



JSR 



PC»MSLGET 



> + 

5* 



COMMENTS: THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, OUT THE 
CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 
ON THE SYSTEM. 

THIS ROUTINE CAN BE USED AS A DELAY ROUTINE, BY SPECIFYING THE 
DESIRED DELAY AS THE TIME -OUT AND SPECIFYING A CONDITION TO 
LOOK FOR WHICH WILL NOT BE ME1 DURING THE DELAY. 
IF A TIME-OUT VALUE OF IS SPECIFIED, THIS ROUTINE CHECKS FOR 
THE DESIRED COMOITION BEFORE RETURNING. IT INDICATES SUCCESS 
IF THE CONDITION IS MET, FAILURE OTHERWISE, 



♦ SUBORDINATE ROUTINES CALLED; NONE. 
*+**+***************************«********************************************* 



MSLGET:: SAVE 



{SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 j CAL L REGISTER SAVE SUBRT 



SET UP MASK FOR REMOVING UNUSED BITS IN THE TEST WORD, AND CLEAR UNUSED 
BITS IN THE DESIRED STATE WORD TO ALLOW DIRECT COMPARISON. 



i - 



COM 
BTC 



R2 

R2.R3 



»GET MASK OF UNUSED BITS. 

{MASK OUT UNUSED BITS IN DESIRED STATE WORD 



j HANDLE 



THE TEST AND EXIT IF WE HAVE A TIME-OUT VALUE. 



TST 
BNE 
MOV 
MOV 
BIC 
CMP 
SEC 
BEQ 



Rl 
2J 
(R4),R0 

R0.625 

RL\RO 

R0.R3 

6$ 



{TEST THE TIME-OUT VALUE FOR ZERO. 
j IF NON-ZERO TIME-OUT, GO LOOP AND TEST. 
jGE! THE WORD TO TEST BEFORE EXITING, 
{SAVE VALUE SO UE CAN RETURN IT. 
jMASK OUT UNTESTED BITS OF WORD. 
jCOMPARE AGAINST DESIRED STATE WORD, 
{INDICATE SUCCESS IN CASE WORDS ARf EQUAL 
{EXIT WITH SUCCESS IF WORDS ARE EQUAL. 



N5 



CZDhWBO DHU-ll FUNC TST PART3 
GLOBAL SUBROUTINE 



2531 
2532 
2533 
2534 
2535 
2536 
2537 
2538 
2539 
2540 
2541 
2542 
2543 
2544 
2545 
2546 

r 47 

.' »-18 
2549 
2550 
2551 
2552 
2553 



2554 
2555 
2556 
2557 
2558 
2559 
2560 



MACRO M1200 
- MSLGET - 
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SEQ 65 



010234 000241 
010236 000416 



010240 016705 172034 

010244 011400 

010246 010067 000042 

010252 040200 

010254 020003 

010256 000261 

010260 001405 

010262 005305 

010264 001367 

010266 005301 

010270 001363 

010272 000241 



010274 016700 000014 

010300 

010300 010066 000002 

010304 010166 000004 

010310 004736 



010312 000207 



010314 000000 



CLC 
BR 



6$ 



j INDICATE FAILURE (TIME-OUT). 

jEXIT WITH FAILURE, WORDS AREN'T EQUAL 



NON-ZERO TIME-OUT VAuUE , LOOP, WAITING FOR CONDITION OR TIME-OUT. 



2i: MOV 

4$: MOV 

MOV 
BIC 

CMP 
SEC 
BEQ 
DEC 
BNE 
DEC 
BNE 
CLC 

HAVE EITHER 
RESTORE THE 



MSLCNT.R5 

(R4),R0 

R0,62$ 

R2.R0 

R0.R3 

65 

R5 
4$ 
Rl 
2$ 



{LOAD MS LOOP COUNT. 

{GET THE WORD TO TEST. 

I SAVE WORD IN CASE THIS IS THE LAST. 

j MASK OUT UNTESTED BITS OF WORD. 

{COMPARE AGAINST DESIRED STATE WORD. 

i SET CARRY IN CASE OF SUCCESS. 

;EXIT WITH SUCCESS IF WORDS ARE EQUAl . 

{COUNT DOWN THE INSIDE MS LOOP COUNT. 

{LOOP IF MS NOT UP. 

{DECREMENT THE MS TIME COUNT. 

{IF TIME NOT UP. LOOP TO COUNT ANOTHER 

{CLEAR CARRY, WE TIMED-OUT. 



MS 



FOUND CONDITION. OR TIMED-OUT (POSSIBLY FROM TIME-OUT VALUE) 
LAST CONTENTS READ FROM THE TEST WORD. EXIT ROUTINE. 



6$; 
60$: 



MOV 
PASS 



62$, RO 
R0,R1 



{PASS OUT THE 

{RESTORE GPRS 

MOV RO.noSLOT(SP) 

MOV R1.R1SL0TCSP) 

JSR PC.S(SP)* 

RO - LAST READ 



RTS PC 
LOCAL STORAGfc, 
624: .WORD 



LAST READ WORD. 
EXCEPT THE FOLLOWING; 

PUT RO IN STACK SLOT. 
PUT Rl IN STACK SLOT. 
RETURN TO PREG05 SUBRT 
CHECKED FOR CONDITION. 



Rl REMAINING 
CARRY - SET IF 



WORD 

TIME (0 IF TIME-OUT OCCURED). 

SUCCESS, CLEAR IF TIME-OUT. 



{STORAGE FOR THE LAST READ WORD. 



136 
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2562 
2563 
2564 

2555 

2566 
256? 
2568 
2569 
25/0 
2571 
2572 
25 73 
2574 
2575 
25 76 
25 / 7 
2578 
2579 
2580 
2581 
2582 
2583 
2584 
2585 
2586 
258/ 
2588 
2589 
2590 
2591 
2592 
2593 
2594 
2595 
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SEQ 66 



SBTTL GLOBAL SUBROUTINE 



MSLOOP 



- TEST LOOP SUBROUTINE - 

THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. II IS USED 

TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOO. THE 

CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 

DESIRED CONOITION AND THE TIME-OUT VALUE IN MILLI -SECONDS . 

THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

ROUTINE AND THEN ONCE EACH MILLI -SECOND THEREAFTER. 



Rl 
R2 

R3 
R4 



* INPUTS! 

* OUTPUTS: 

♦ CALLING SEQUENCE; 

♦ COMMENTS: 

* 



TIME-OUT VALUE IN MILLI -SECONOS CUP TO 64K MS). 
BIT MAP OF BITS TO TEST CI INDICATES TO TEST THE BIT). 
DESIRED STATES OF THE INDICATED FIELDS IN R2. 
ADDRESS OF THF WORD TO TEST. 



MSLCNT - MILLI SECONO SOFTWARE LOOP COUNT. 

CARRY - SUCCESS FLAG CSET IF CONOITION IS MET BEFORE TIME -OUT). 



JSR 



PC .MSLOOP 



THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK, BUT THE 

CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 

ON THE SYSTEM. 

THIS ROUTINE CAN BE USED AS A DELAY ROUTINE. BY SPECIFYING THE 

DESIRED DELAY AS THE TIME-OUT ANO SPECIFYING A CONDITION TO 

LOOK FOR WHICH WILL NOT BE MET DURING THE DELAr. 

IF A TIME-OUT VALUE OF IS SPECIFIED. THIS ROUTINE CHECKS FOR 

THE DESIRED CONOITION BEFORE RETURNING. IT INOICATES SUCCESS 

IF THE CONDITION IS MET, FAILURE OTHERWISE, 



♦ SUBORDINATE ROUTINES CALLED? MSLGET 



2596 
259/ 
2598 
2599 
2600 
2601 
2602 
2603 

2604 



01031b 
010316 



004567 173476 



MSI. OOPs i SAVE 



iSAVF CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBRT . 



j CALLING THE MSI GF T ROUTINE FROM THE. MSLOOP ROUTINE ISOLATES THE. CALLER Of 
j MSLOOP FROM THE RETURNED TEST WORD ANO REMAINING TIME -OUT VALUES, 



010322 004 76 7 177654 



010326 
010326 
010330 



004/36 
000207 



60$ { 



JSR 

PASS 

RTS 



PC.MSLGET 

JSR 
PC 



,CALL THE MULTI-PURPOSE MS LOOP ANO SEARCH RTN. 

, RE 5 TOR*: GPRS, 

PC.SCSPW i RE TURN TO PRFG05 SWRT % 

jCARRt « SET IF SUCCESS, CLEAR IF TIME-UUT, 



um^WobhW" 1 
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MA 



6BPs 
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SEC) 67 



5606 

560 7 
5608 
5609 
5610 

26 ir 

5613 
5614 
5615 
5616 
5617 
5618 
5619 
5650 
5651 
5655 
5653 
5654 
5655 

5656 
5657 



5658 

5659 



5630 

5631 
5635 

5633 
56 34 
5635 



010335 
010335 

010336 
010336 
010340 
010345 
010344 

010346 
010346 
010355 
010356 
010360 
010365 
010366 
010366 
010370 
010375 
010375 
010374 

010376 
010401 
010404 
010407 
010415 
010415 
0104 50 
010453 
010456 
010431 
0104 34 
010457 
010445 
010445 
010450 

0104H 



004567 173465 



104454 
000145 
010376 
000000 



015746 
015746 
010600 
104417 
065706 

104455 
000776 

004 736 
000507 

110 
154 
117 
155 
155 
101 
157 
105 
155 
117 
15 7 
105 
155 
105 
117 
124 



010465 
000001 



000004 



117 
040 
115 
154 
040 
155 
101 
040 
040 
106 
101 
040 
107 
116 
155 
105 



.SBTTL GLOBAL SUBROUTINE - OOPS - 

- PROGRAM ABORT SUBROUTINE - 
THIS SUBROUTINE IS USED TO ABORT THE PROGRAM WHEN A FATAL ERROR IS 
DETECTEO IN THE PROGRAM OR THE HOST SYSTEM HARDWARE, AN FRROR MESSAGE 
IS PRINTED GIVING SOME INFORMATION ABOUT THE NATURE OF THE ABORT. 



INPUTS; 
OUTPUTS; 



Rl - ERROR CODE GIVING REASON FOR ABORT. 

AN ERROR MESSAGE IS PRINTED, 

A LIST OF RETURN PC VALUES FOR ALL SUBROUTINE CALLS 15 PRINTED. 



JSR 



PC, OOPS 



CALLING SEQUENCE; 

COMMENTS; 

SUBORDINATE ROUTINES CALLED: NONE. 



OOPS;; SAVE 



5*: 

60$ 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVE SU6RT . 

j REPORT "HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED." ERROR. 
ERRSF 10UEM0101 

TRAP 
.WORD 
.WORD 
.WORD 
j REPORT "PROGRAM HUNG, WAITING FOR A CONTROL -C." 
PRINTF 0EM0105 

MOV 
MOV 
MOV 
TRAP 
ADD 
lLCo.< FOR OPERATOR CONTROL -C INPUT. 

TRAP 
l INF" INI Tt LOOP. 

iDON'T NEED THIS, BUT SOMEBODY MAY CHANGE THIS 
PC.S(SP)* jRETURN TO PREG05 SUfcRT* 

i ROUTINE. IN THE FUTURE, SO BE CONSISTANT. 



BREAK 

BR 
PASS 

RTS 



5$ 



C'ERSF 
) 0\ 

t.10101 




*EM0105,-(SP) 
•1. (SP) 

SP.RO 

CIPNTF 
04 , SP 

C«BRK 



JSR 



PC 



153 
103 
150 
105 
110 
10* 
155 
117 
153 
154 
155 
105 
040 
103 
116 
152 



EM0101;; .ASCI* /HOST COMPUTER HARDWARE QR SOFTWARE BUG ENCOUNTERED,/ 



£M°s!fflofth^ NC 



TST PART? 



D6 



MAggp s M1200 
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SfcQ 68 



26 36 



2637 



010462 
010465 

0104 70 
0104 73 
0.104 76 
010501 
010504 
010507 
010512 
010515 
010520 
010523 
010526 
010531 
010534 
010537 
010542 
010545 
010550 
010553 
010556 



688 

045 
101 
117 
101 

no 

107 
127 
124 
107 
117 
101 
117 
122 
055 
040 
052 
052 
052 
052 
045 
116 



104 

116 
120 
107 
115 
125 
054 
101 
Ul 
040 
122 
040 
116 
117 
103 
074 

052 
052 
052 
052 
116 
000 



056 

045 
122 
122 
040 
116 
040 
111 
116 
106 
040 
3 03 
124 
114 
056 
052 
052 
052 
052 
052 
045 



EM0102:; ,ASCI2 /*N*APROGRAM HUNG, WAITING FOR A CONTROL-C, < *****+********N*N/ 



.EVEN 
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MACR 



®m 2o ° 



EG 
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2639 
2640 
2641 



2643 
2644 
2645 
2646 
264 7 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2658 

2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 

266 7 
2668 
2669 
2670 
2671 
2672 

267 3 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2681 
2682 
2683 
2684 
2685 

2686 
2687 



010560 

010560 004567 173234 

010564 012701 001000 

010570 016704 171406 

010574 011402 

010576 100016 



010600 012700 070000 
010604 040200 
010606 001006 



010610 012700 000301 

010614 040200 

010616 001002 

010620 004767 000130 

010624 005301 

010626 001362 

010630 000241 

010632 000401 

010634 000261 

010636 

010636 004736 

010640 000207 



SBTTL GLOBAL SUBROUTINE - PUFIFO - 

* - PURGE THE FIFO 

* THIS ROUTINE TRIES TO REMOVE ALL THE CHARACTERS FROM THE FIFO, 

* ANY BMP CODES THAT ARE FOUND ARE SAVED ON THE BMP CODE QUEUE. 
* 

* INPUTS: RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER. 

* OUTPUTS: CARRY BIT - INDICATES THE STATE OF THE FIFO. SET:- PURGED. 

* BMPCQ - THE CONTENTS OF THE BMP CODE QUEUE MAY BE UPDATED, 

* CALLING SEQUENCE: JSR PC, PUFIFO 

* 

* COMMENTS: 

* SLBORDINATE ROUTINES CALLED: SAVBMP. 

j SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 {CALL REGISTER SAVE SUBRT. 
jSET MAXIMUM TRY COUNT C 512. 
jGET ADDRESS OF THE RECEIVER BUFFER REGISTER. 

(GET THE CONTENTS OF THE RECEIVER BUFFER REG. 

{EXIT IF THE FIFO IS EMPTY, DATA_VALID CLR. 
{ ♦ 

l CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE. 
; IF IT IS, THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPORTED LATER, 



PUFIFO: 


:SAVE 






MOV 
MOV 


0512., Rl 

RBUFA.R4 


2$: 


MOV 
BPL 


CR4),R2 
6$ 



MOV 
BIC 
BNE 



070000, RO 

R2.R0 

At 



{GENERATE A BIT MAP OF CHAR ERROR BITS 

j WHICH ARE NOT SET FOR CHAR. 

{THROW CHAR AWAY IF NOT BMP OR SELFTEST CODE. 



{ CHECK IF THE READ DATA IS MODEM STATUS , BMP OR SELFTEST?. 



4$: 

6$: 

60$ 



MOV 
BIC 

BNE 

JSR 

DEC 
BNE 

CLC 
BR 
SEC 

PASS 
RTS 



0301, RO 

R2.R0 

4$ 

PC.SAVBMP 

Rl 
2$ 

60$ 



JSR 



PC 



j CHECK IF BMP, 

{TRY TO CLEAR BMP FLAGS IN THE READ DATA. 

i IF IT IS MODEM OR SELFTEST CODE THROW IT AWAY. 

{SAVE BMP CODE ON THE QUEUE, 

{DECREMENT THE TRY COUNT, 

{LOOP TO TRY AGAIN. 

{CLEAR CARRY, TO INDICATE FIFO NOT PURGED. 

{EXIT WITH CARRY CLEAR. 

,SET CARRY, TO INDICATE FIFO PURGED. 

{RESTORE GPRS. 

PC.S(SP)* {RETURN TO PREG03 SUBRT 

{CARRY BIT, SET INDICATES FIFO PURGED. 



SEQ 69 
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2089 
2690 

2b9t 
2692 
2695 
2694 

2695 
2696 
269? 
2698 
269S 
2700 
2701 
2 702 
2705 
2 704 
2705 
2706 
2707 
2708 
2709 
2710 
2711 
2712 
2713 
2714 
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- RESETT - 
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SEQ 70 



2715 

2716 
2717 
2718 
2719 
2720 
2721 
2722 
2723 
2724 
2725 
2726 
2727 
2728 
2729 
2730 
2 731 
2732 
2733 
2734 
2735 
2736 
2737 
2738 
2 739 
2740 
2741 
2/42 
2 74 3 
2744 



010642 
010642 
010646 



004567 
012702 



173152 
000040 



010652 
010656 
010660 
010662 
010664 
010670 
010674 



016704 
030214 
001406 
005003 
012701 
004 767 
103012 



171322 



011610 
177306 



010676 
010702 



010277 
004767 



171276 
000160 



010706 
010710 
010714 
010720 



005003 
012701 
004 767 
103410 



OU610 
177262 



.SBTTL GLOBAL SUBROUTINE - RESETT - 

. ***************************************&*******************************+****+* 



- RESET DEVICE UNDER TEST - 
THIS SUBROUTINE IS USED TO RESET THE OUT TO A KNOWN STATE, 
IF RESET DOES NOT SUCCESFULLY COMPLETE, IE. TIME-OUT OCCURS, THEN 
AN ABORT TEST ERROR MESSAGE IS REPORTED. 



INPUTS: 



OUTPUTS j 



;* 
{* 

}* 
{ + 
i* 
;* 
5* 

:* 
i* 
i* 
s* 
i* 
j* 
;* 

5* 

; + 
j* 

;* 

{* 
,* 

j* SUBORDINATE ROUTINES CALLED; DELAY .MSLGET . 

* **************************************** *******♦**+**************+**** * ******* 



CSRA - CONTAINS THE ADDRESS OF THE CSR 

TXBFCA - CONTAINS ADDRESS OF OUT DMA BUFFER COUNT REGISTER. 

ERRTBL- ERRTYP,ERNBR,AND ERRM5G SET \JP CORRECTLY. 

THE OUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED. 

ERRBLK - VALUE MAY BE DESTROYED. 

IESTAT - TX ANO RX INTERRUPT FLAGS ARE CLEARED. 

TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, RESETT 



THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNBR 
THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 



RESETT: : SAVE 
MOV 



JSR 
*eiT05,R2 



{SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 {CALL REGISTER SAVE SU6RT 
jSET BIT MASK OF MASTER RESET BIT, 



TEST THE STATE OF THE MASTER RESET BIT IN THE CSR. 
IF MR IS SET THEN WAIT FOR SELF-TEST TO COMPLETE, 
IF TIME-OUT OCCURS, REPORT THE ERROR AND PASS-OUT ABORT TEST INDICATOR 



: - 



MOV 
BIT 
BEQ 

CLR 
MOV 

JSR 

BCC 



CSRA,R4 

R2.CR4) 

2$ 

R3 

$5000. ,R1 

PC.MSLGET 

4$ 



{GET THE ADDRESS OF THE DUT'S CSR. 

{CHECK STATE OF MASTER RESET BIT. 

{DON'T DELAY IF MR IS ALREADY CLEAR. 

{SET UP DESIRED STATE OF MASTER RESET 

jPASS TIME-OUT VALUE OF 5 SECONDS, 

{WAIT FOR SELF -TEST TO COMPLETE, MR CLEAR. 

jGO REPORT ERROR IF TIMEOUT OCCURRED. 



BIT 



SET MASTER RESET BIT IN CSR. CLEAR TX AND RX ENABLE BITS, ETC. 
SKIP THE SELrTEST. 
TIME-OUT OF 5 SECS, JUST IN CASE THE SELF-TEST EXECUTES, 



i 
2$ 



MOV 
JSR 



R2.3C5RA 
PC.SKPSTS 



jSET MASTER RESET BIT. DISABLE TX AND RX INTS 
{TRY TO SKIP THE SELFTEST, 



SET SELF-TEST TIME-OUT OF 5 SECONDS, AND WAIT FOR M.R TO CLEAR. 

IF TIME-OUT OCCURS, THEN REPORT THE FATAL ERROR AND PASS-OUT THE ABORT 



; TEST INDICATOR. 



J - 



CLR 
MOV 
JSR 

acs 



R3 

45000. ,Ri 
PC.MSLGET 
6$ 



iSCT UP DESIRED STATE OF MASTER RESET BIT 
;PASS TIME-OUT VALUE OF 5 SECONDS. 
{WAIT FOR SELF -TEST TQ COMPLETE, MR CLEAR 
I SKIP ERROR REPORT IF MR CLEARED IN TIME. 
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2745 
2746 
2747 
2749 
2749 
2750 
2751 
2752 
2753 



2755 

2756 
2757 
2758 
2759 
2760 
2761 
2762 
2763 

2764 

2765 
2766 



010722 
010726 



010734 
010734 
010736 
010740 



010742 
010746 

010750 
010750 

010752 



MACRO M1200 
- RESETT - 



{ 
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SEQ 71 



012701 004670 
012767 006570 



104460 
000241 
000403 



005067 171262 
000261 



004 736 
000207 



; SET UP ERROR MESSAGE TO REPORT "FATAL ERROR FOUND DURING RESET, TEST ABORTED". 
; INDICATE TEST IS TO BE ABORTED BY CLEARING THE CARRY BIT, 

4$: MOV 0EM16O1.R1 jPASS ERROR MESSAGE TO REPORT. 
173062 MOV OER1603.ERRBLK jPASS ADDRESS OF ERROR HANDLING ROUTINE. 

jREPORT ERROR "TIME-OUT OCCURRED WAITING FOR MASTER RESET TO CLEAR" 

; "TEST ABORTED" 

ERROR | >>>>> ERROR <<<<< 

TRAP C $ERRQR 
CLC j INDICATE TEST IS TO BE ABORTED. 

BR 60$ j EXIT THIS SUBROUTINE. ABORT TEST INDICATOR. 

CLEAR TX AND RX INTERRUPT ENABLE STATUS FLAGS IN IESTAT. 
EXIT WITH CONTINUE TEST INDICATOR SET (IE. CARRY SET). 



6$: 
60$: 



CLR 
SEC 

PASS 
RTS 



IESTAT 



JSR 



PC 



{CLEAR TX AND RX INTERRUPT STATUS FLAGS. 
I INDICATE SUCCESS, CONTINUE TEST. 

{RESTORE GPRS, PASS THE FOLLOWING INTACT: 
PC.SKSP)* ;RETURN TO PREG05 SUBRT 

{CARRY BIT:IF CLEAR, INDICATES ABORT TEST. 
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H6 
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^EQ 72 



.7760 

2769 
2770 
2771 
2772 
2773 
2774 
2775 
27 7b 
2777 
2778 
27 79 
2780 
2781 
2 782 
2783 
2784 
2785 
2786 
2787 
2 788 
2789 
2790 
2791 

2792 
2793 
2794 
2795 
2 796 
2797 
2798 
2799 
2800 
2801 
2802 

2803 



010754 
010754 
010760 
010764 
010770 
010772 
010776 
011000 
011004 
011006 
011012 

011016 
011016 
011020 



004567 
016704 
116724 
005204 
042702 
010224 
020427 
103402 
162704 
010467 



004 7 36 
000207 



SBTTL GLOBAL SUBROUTINE - SAVBMP - 

♦ ♦ **4.±±* + ±++** + * + 4>* + + * + * + + * + * + + + + ** + + + * + + + + * + + **** + + *. + + + ±* + + + * + + + **** + ++. + + +4.^ 

♦ - SAVE BMP CODES ROUTINE - 

* THIS ROUTINE SAVES THE PARAMETER PASSED IN, ONTO THE BMP CODE QUEUE 

* TOGETHER WITH THE NUMBER OF THE CURRENTLY EXECUTING TEST. 

* 

R2 - CONTAINS THE BMP CODE THAT IS TO BE PLACED ON THE QUEUE. 

BMPCQP - CONTAINS ADDRESS OF NEXT LOCATION IN THE BMP QUEUE. 

BMPCQB - LABEL AT BASE OF THE BMP CODE QUEUE. 

BMPCQE •• LABEL OF NEXT LOCATION AFTER THE END OF THE BMP QUEUE. 

TSTNUM - CONTAINS THE NUMBER OF THE CURRENT TEST. 



* INPUTS: 

+ 

+ 

* OUTPUTS: 

* CALLING SEQUENCE: 



BMPCQP - INCREMENTED BY 4, 

THE CONTENTS OF THE BMP CODE QUEUE ARE UPDATED. 



JSR 



PC, SAVBMP 



+ 

* COMMENTS: IF THE OVERFLOW OCCURS V! ;!■-.< THE LAST LOCATION WILL BE 

* OVERWRITTEN BY ANY SUISUIULNT ATTEMPTS TO UPDATE THE QUEUE. 

* SUBORDINATE ROUTINES CALLED: NONE. 



173040 
171364 
171236 

177400 

002552 

000004 
171332 



SAVBMP:: SAVE 

MOV 
MOVB 
INC 
BIC 
MOV 
CMP 
BLO 
SUB 
2$: MOV 

60$: PASb 

RTS 



JSR 
BMPCQP, R4 
TSTNUM, CR4)* 
R4 

#177400, R2 
R2.CR4)* 
R4 , OBMPCQE 
2$ 

44, R4 
R4, BMPCQP 



.•SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 jCALL REGISTER SAVE SUBRT. 

{GET THE POINTER TO THE NEXT LOCATION IN QUEUE. 

j SAVE THE CURRENT TEST NUMBER ON THE QUEUE. 

j INCREMENT THE POINTER TO GIVE AN EVEN ADDRESS. 

j CLEAR THE UNWANTED BITS FROM THE BMP CODE. 

j SAVE THE BMP CODE ON THE QUEUE. 

j CHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 

iGO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 

{RESET THE POINTER TO THE LAST LOCATION IN QUE. 

{SAVE THE POINTER. 



PC 



JSR 



{RESTORE GPRS. 

PC.acsPV 



{RETURN TO PREG05 SUBRT 
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2805 
2806 
2807 
2808 
2809 
2810 
2811 
2812 
2813 
2814 
2815 
2816 
2817 
2818 
2819 
2820 
2821 
2H22 
2823 
2824 
2825 
2826 
2827 
2828 



TST PART3 



2829 
2830 
2831 
2832 
2831 
2834 
2835 
2836 
2837 
28 38 
2839 

2840 



011022 
011022 
011026 
011032 
011036 
011042 
011044 
011050 
011054 
011056 
011060 

011062 
011062 
011064 



004567 
016701 
012702 
012/03 
050103 
010177 
017722 
005201 
020103 
002771 



004 736 
000207 
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SEQ 73 



172772 
171176 
002610 
000020 

1/1130 
171132 



SBTTL GLOBAL SUBROUTINE - SAVMST - 

f t *************************** **************************** * ************ ******* 

* 

* 

* 

* 

* INPUTS? CSRA - 

* IESTAT 

* NUMLNS 

* FSLSA 

* STSTB 
* 

* OUTPUTS; 

* 
* 

* CALLING SEQUENCE: JSR PC, SAVMST 

* 
* 
* 
* 
* 



- SAVE MODEM STATUS ROUTINE - 
THIS ROUTINE SAVES THE PRESENT CONTENTS OF THE OUT STAT REGISTERS IN 
THE STAT STORAGE TABLE, 

CONTAINS THE ADDRESS OK THE OUT CSR. 

- STATL OF THE OUT CSR INTERRUPT ENABLE BITS. 

- EQUATED TO THE NUMBER OF LINES ON THE OUT. 
CONTAINS THE ADDRESS OF THE OUT STAT REGISTER. 
LABEL AT BASE OF THE STAT STORAGE TABLE. 

STST TABLE - OVERWRITTEN WITH PRESENT STAT CONTENTS. 
CSR IND.ADR.REG FIELD - DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 



IF THE CONTENTS OF IESTAT CHANGES DURING THIS TEST THE CSR 
INTERRUPT ENABLE BUS WILL NOT TRACK THE CHANGE. 

SUBORDINATE ROUTINES CALLED: NONE. 
*************************************************************************** 



SAVMST:: SAVE 



MOV 
MOV 
MOV 
BIS 
MOV 
MOV 
INC 
CMP 
BLT 



2$: 



IESTAT, Rl 

*STSTB,R2 

•NUMLNS. R3 

R1,R3 

R1.8CSRA 

BFSLSA,(R2)» 

Rl 

R1.R3 

2$ 



;SAVE CONTENTS OF GPR3 RO THRU R5. 
R5.PREG05 {CALL REGISTER SAVE SU6RT. 
iGET IE STATES FOR UPDATING IND.ADR.REG FIELD 
{SET UP STAT STORAGE POINTER TO BASF. OF TABLE 

{FORM COMPLETION COMPARISON WORD. 

I SET UP THE CSR IND.ADR.REG FIFLD, 

{SAVE CONTENTS OF THIS LINE'S STAT REGISTER. 

{SET LINE COUNTER TO NEX1 LINE. 

;CHF.CK FOR ALL LINES DONE. 

{LOOP IF NOT ALL LINES DONE. 



60$: 



PASS 
RTS 



PC 



JSR 



{RESTORE GPRS. 
PC.SCSP)* 



{RETURN TO PREG05 SUBRT. 



u 



6 
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S&Q 74 



3842 
2843 
2844 
2845 
2846 
284 7 
2848 
2849 
2850 
2851 
2852 
2853 
2854 
2855 
2856 
2857 
2858 
2859 
2860 
2861 
2862 

2863 
2864 
2865 
2866 
2867 
2868 
2869 
2870 
2871 
2872 
2873 
2874 
2875 
2876 
2877 
2878 
28 79 
2880 
2881 

2882 



011066 
011066 
011072 
011076 



011106 
011112 
011114 
011120 
011122 
011124 
011130 
011132 
011136 

011140 
011140 
011142 



004567 
012704 
004767 



012703 
005301 
016704 
010124 
010324 
020467 
103774 
032701 
001365 



004 736 
000207 



.SBTTl. GLOBAL SUBROUTINE - SKPSTS • 

j* • SKIP SELFTEST ROUTINE - 

j* THIS SUBROUTINE IS USED TO SKIP THE SELFTEST AFTER A DUT RESE1 HAS BEEN 

}* INITIATED. IT MUST BE ENTERED IMMEDIATELY AFTER SETTING THE DUT MASTER 

I* RESET ROUTINE OR AFTER THE EXECUTION OF A BUS RESET (BECAUSE OF TIMING 

t* CONSIDERATIONS). 

• * 

i* INPUTS? CSRA - CONTAINS ADDRESS OF THE DUT CSR, 

;♦> TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 

}* 

;* OUTPUTS: SKIP SELFTEST CODES ARE WRITTEN TO THE DUT REGISTERS. 

}♦ CALLING SEQUENCE: JSR PC, SKPSTS 

i* 

j* COMMENTS: 

:* 

{* SUBORDINATE ROUTINES CALLED: DELAY. 



172726 
000012 
177040 



SKPSTS:: SAVE 

MOV 
JSR 



{SAVE CONTENTS OF GPRS RO THRU R5 . 
JSR R5.PREG05 {CALL REGISTER SAVE SUBRT. 
010., R4 {PASS DELAY VALUE OF 10 MILL! -SECONDS . 

PC. DELAY {DELAY FOR 10 MILLI -SECONDS. 



011102 012701 000060 



WRITE SKIP SELF -TEST CODE (52525) TO ALL THE INDEXED UUT REGISTERS. 



052525 
171060 

171066 
000017 



MOV *NUMLNS!B 
{THE ABOVE INCLUS 
{ LACK OF A M.R. 



4$: 
6$: 



60$: 



MOV 
DEC 
MOV 
MOV 
MOV 
CMP 

BLO 
BIT 

BNE 

PASS 
RTS 



*52525,R3 

Rl 

CSRA.R4 

R1.(R4)» 

R3,(R4)* 

R4, TXBFCA 

6$ 

n/.Ri 

4$ 



IT05.R1 {FORM IND.ADR.REG FIELD (PLUS M.R. BIT) WORD 
ION OF TH€ M.R. BIT IS NECESSARY BECAUSE OF THE 
BIT WRITE LOCK-OUT ON THE DHU-11. 

{INITIALISE THE SKIP SELF-TEST CODE. 
{SELECT THE NEXT SET OF DEVICE REGISTERS. 
{GET THE ADDRESS OF THfc CSR OF THE DUT. 
{SELECT A BANK OF OUT REGISTERS. 
{WRITE THE CODE TO A DUT REGISTER. 
{COMPARF POINTER WITH LAST REGISTER ADDRESS. 
LOOP IK NOT ALL REGS DONE IN THIS BANK. 
TEST FOR IND.ADR.REG FIELD DECREMENTED TO 0. 
LOOP UNTIL ALL REGISTERS CONTAIN THE CODE. 



PC 



{RESTORE GPRS* 
JSR PC.a(SP)* 



{RETURN TO PREG05 SUBRT, 
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SEQ 75 



2884 

2885 
2886 
2887 
2888 
2889 
2890 
2891 
2892 
2893 
2894 
2895 
2896 
2897 
2898 
2899 
2900 
2901 
2902 
2903 
2904 
2905 
2906 
2907 

2908 
2909 
2910 
2911 
2912 
2913 
2914 
2915 
2916 
2917 
2918 
2919 
2920 
2921 
2922 
2923 
2924 
2925 
2926 
292 7 
2928 
2929 
2930 
2931 
2932 
2933 
2934 
2935 
2936 
293/ 
2938 
2939 



011144 
011144 



011150 
011152 
011154 
011156 
011162 



011164 
011166 
011170 
011172 
011174 



011200 
011202 
011204 
011206 
011210 
011212 
011214 



011216 
011220 



010204 
160104 
103403 
012701 
000442 



005004 
00024 1 
006001 
006004 
012700 



010246 
010346 
160403 
005602 
103402 
\f>0\0? 
103003 



01260 3 
012602 



.SBTTL GLOBAL SUBROUTINE - UNSDIV - 

t ♦ + + ******.* + + + ***.*■ + + + + + * + + + + + + ** + *+. + + **** + ***+. + ****+■ + *■ + *$***. + *** + **■ + +. + *+. + *.* + * 

- UNSIGNED DIVIDE ROUTINE - 

* THIS SUBROUTINE IS USED TO DIVIDE A 32 BIT UNSIGNED DIVIDEND Br A 

* 16 BIT UNSIGNED DIVISOR GIVING A 16 BIT QUOTIENT. ALL NUMBERS ARE 

* CONSIDERED TO BE UNSIGNED. A SUCCESS FLAG IS NOT SET ON RETURN IF 

* THE QUOTIENT WAS TOO BIG TO BE CONTAINED IN 16 BITS. 
* 

♦■ INPUTS'. Rl - THE DIVISOR, UNSIGNED, 16 BITS. 
!♦ R2 - MOST SIGNIFICANT WORD OF THE DIVIDEND, UNSIGNED, 16 BITS. 

5* R3 - LEAST SIGNIFICANT WORD OF THE DIVIDEND, UNSIGNED, 16 BITS. 

{* 

{♦ OUTPUTS; Rl - QUOTIENT, UNSIGNED, 16 BITS C177777 IF OVERFLOW). 
}* CARRY - SUCCESS FLAG, SET IF COMPLETE QUOTIENT FITS IN 16 BITS. 

♦ 

* CALLING SEQUENCE: JSR PC. UNSDIV 

* 

* COMMENTS: IF THE DIVISOR IS THE QUOTIENT IS RETURNED AS ALL ONES 

* C 177777) AND THE CARRY IS CLEAR REGARDLESS OF THE DIVIDEND. 
♦ 

* SUBORDINATE ROUTINES CALLED: .NONE. 

.. * + + + *. + + + * + + * ++. + +. + 4, + 4, + + +± + +, + *i.* + + *+m** + + m* + +*m + m + 4* + + mm+mm4.t 



004567 172650 



UNSDIV:: SAVE 



{SAVE CONTENTS Of GPRS RO THRU R5. 
JSR R5.PREG05 {CALL REGISTER SAVE SUBRT. 



CHECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION. 



177777 



MOV 
SUB 
BCS 
MOV 
BR 



R2.R4 
R1.R4 
2$ 
#-l,Rl 

60$ 



{GET MSW OF DIVIDEND FOR SUBTRACT. 

{SUBTRACT DIVISOR FROM MSW OF DIVIDEND. 

{IF IT DIDN'T GO, WE HAVE QUOTIENT < 16 BITS. 

{SET QUOTIENT TO ALL ONES (177777), 

{EXIT WITH CARRY CLEAR. 



SET UP COUNTERS AND VARIOUS WORKING GPRS. 
2$: CLR R4 



000020 



CLR 
CLC 
ROR 
ROR 

MOV 



Rl 
R4 
016. ,R0 



THE SUBTRACT AND SHIFT LOOP. 



4$ 



MOV 
MOV 
SUB 
^BC 
BCS 
SUB 
BCC 



R2, -(SP) 

R3, (SP) 

R4.R3 

R2 

6$ 

R1,R2 

8$ 



{CLEAR THE LSW OF THE DIVISOR. 

{CLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 

; DIVISOR BY 

j 2 (UNSIGNED) 

jSET UP INITIAL SHIFT COUNT TO 16. 



{SAVE MSWORD OF DIVIDEND. 

{SAVE LSWORD OF DIVIDEND. 

{LSWORD DIVIDEND - LSWORD OF DIVISOR. 

{MSWORD DIVIDEND - BORROW . 

j IF BORROW FROM BORROW SUBTRACT, IT DIDN'T GO. 

;MSWORD DIVIDEND - MSWORD OF DIVISOR. 

{IF NO BORROW, IT WFNT , CARR^ TS CLEAR. 



IT DIDN'T GO. SO WE SHIFT A 1 INTO THE QUOTIENT (COMPLEMENTED LATER), 
CARRr is SE1 . 



64: 



I - 



MOV 
MUV 



(SP).,R-'< 
(SP)».R2 



{RfSTORE LSWORD Of DIVIDEND. 
{RESTORE MSWORD OF DIVIDEND, 



C/DHWOO DKU-11 KUNC TST PART3 
GLOBAL SUBROUTINE 


2940 


011222 


000401 


294 1 






2942 






2943 






2944 






2945 


011224 


012626 


2946 






294 7 






2948 






2949 


011226 


006105 


2950 


011230 


000241 


2951 


011232 


006001 


2952 


011234 


006004 


2953 


011236 


005300 


2954 


011240 


001357 


2955 


011242 


005105 


2956 






2957 






2956 






2959 


011244 


000241 


2960 


011246 


006103 


2961 


011250 


103402 


2962 


011252 


160403 


2963 


011254 


103403 


2964 






2965 






2966 






2967 


011256 


005205 


2968 


011260 


001O01 


. % 69 


011262 


005305 


...70 






2971 






2972 






2973 


011264 


010501 


2974 


011266 


000261 


2975 






2976 


011270 






011270 


010166 000004 




011274 


004 736 


297 7 






2978 


011276 


000207 
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r >EQ 76 



BR 



10$ 



jGOTO SHIFT 1 INTO THE QUOTIENT. 



8$ 



10$ 



} ♦ 



IT WENT, SO WE RESTORE THE STACK AND SHIFT A INTO GUOTIENT (WILL BE 
COMPLEMENTED LATER). CARRY IS CLEAR. 

MOV (SP)*.(SP)* {POP THE SAVED DIVIDEND OFF OF THE STACK. 

SHIFT THE RESULT OF THE SUBTRACT ATTF.fiPT INTO THE QUOTIENT SHIFT REG. 

R5 



ROL 
CLC 

ROR 
ROR 
DEC 
BNE 
COM 



Rl 
R4 
RO 
4$ 
R5 



jSHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 

{DIVIDE THE 

5 DEVISOR BY 

} 2 (UNSIGNED). 

{COUNT THIS SHIFT AND SUBTRACT. 

{LOOP FOR ANOTHER SHIFT £ SUB IF NOT DONE. 

{GET QUOTIENT FROM INVERTED QUOTIENT. 



NOW WE EITHER ROUND UP OR LEAVE QUOTIENT ALONE. 



CLC 
ROL 
BCS 

sue 

BCS 



R3 
12$ 
R4,R3 
14$ 



{CLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
{MULTIPLY LSWORD OF DIVIDEND BY 2, MSWORD IS O. 
{IF CARRY FROM SHIFT, ROUND UP, 
{SUBTRACT DIVISOR FROM DIVIDEND. 
;IF BORROW, DON'T ROUND UP. 



ROUND UP, EXTRA SUBTRACT WENT. 



i - 
12$: 



INC 
BNE 
DEC 



R5 

14$ 
R5 



{INCREMENT THE QUOTIENT BY ONE, 

j IF NO OVERFLOW, WE LEAVE THE ROUND UP. 

{DON'T LET ROUNDING CAUSE OVERFLOW. 



ALL DONE, PASS QUOTIENT AND EXIT. 



14$ 
60$ 



MOV 
SEC 

PASS 



RTS 



R5.R1 {PASS QUOTIENT BACK IN Rl. 

{INDICATE NO OVERFLOW. 

Rl {RESTORE GPRS, LEAVE THE FOLLOWING INTACT: 

MOV Rl.RlSLOUSP) {PUT Rl IN STACK SLOT. 

JSR PC,aCSP)» {RETURN TO PREG05 SUBRT 

{Rl • 16 BIT, UNSIGNED QUOTIENT, 

PC {CARRY - SET INDICATES NO OVERFLOW (SUCCESS). 
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2980 
2981 
2982 
2983 
2984 
2985 
2986 
298 7 
2968 
2989 
2990 
2991 
2992 
2993 
2994 
2995 
2996 
2997 
2998 
2999 
3000 
3001 
3002 
3003 
3004 
3005 
3006 
3007 
3008 



TST PART3 



3009 

3010 
3011 
3012 
3013 
3014 
3015 
3016 
3017 
3018 
3019 
3020 
3021 
3022 



3023 
3024 



011300 
011300 
011304 
011306 
011310 
011314 
011320 
011322 
011324 
011326 
011330 
011334 
011336 

011342 
011344 
011344 
011350 



004567 
010204 
010102 
042701 
042702 
000302 
006202 
006202 
006202 
016202 
005003 
004 767 

010002 

010266 
004 736 
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SBTTL GLOBAL SUBROUTINE - WAIBIC - 

* - WAIT TOR BIT CLEAR ROUTINE •• 

* THIS SUBROUTINE WAITS TOR THE SPECIFIED BIT TO BECOME CLEAR. IF THE 
+ SPECIFIED BIT GOES TO A CLEAR STATE WITHIN THE SPECIFIED TIME-OUT 

* PERIOD A SUCCESS INDICATION IS RETURNED BY THIS ROUTINE. 

* THE LAST VALUE WHICH IS READ LOOKING FOR THE CONDITION IS RETURNED TO 

* ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 
+ 

* INPUTS j Rl - TIME-OUT VALUE AND BIT NUMBER INDICATION: 

* BITS 15 THRU 12 - NUMBER OF BIT TO TEST (RANGE THRU 15). 

* BITS 11 THRU - TIME-OUT VALUE IN MILLI-SECONDS (4095 MAX). 

* R2 - ADDRESS OF WORD CONTAINING THE BIT TO TEST. 

* MSLCNT. 
* 

* OUTPUTS: R2 - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
CARRY - SUCCESS FLAG (CARRY SET IF BIT CLR 3EF0RE TIME-OUT). 



CALLING SEQUENCE: 



MOV 0130040, Rl 

MOV 0LABEL.R2 
JSR PCs WAIBIC 



{PASS BIT 11 (13 OCTAL) AND 

: 32 (40 OCTAL) MS DELAY. 

;TEST BIT IN WORD AT "LABEL". 

{WAIT 32 MS FOR BIT 11 TO CLR. 



* COMMENTS: 



* SUBORDINATE ROUTINES CALLED: MSLGET. 



172514 



170000 
007777 



002310 
176640 

000006 



WAIBIC:: SAVE 



60$: 





JSR 


MOV 


R2.R4 


MOV 


R1,R2 


BIC 


0170000, Rl 


BIC 


07777, R2 


SWAB 


R2 


ASR 


R2 


ASR 


R2 


ASR 


R2 


MOV 


BITTBL(R2),R2 


CLR 


R3 


JSR 


PC, MSLGET 


MOV 


R0,R2 


PASS 


R2 




MOV 




JSR 



011352 000207 



RTS 



PC 



{SAVE CONTENTS OF GPRS RO THRU R5, 
R5.PREG05 jCALL REGISTER SAVE 5UBRT. 
j SET UP THE ADDRESS PARAMETER FOR MSLGET. 

iSEPF.RAlt DELAY COUNT OUT OF PASSED PARAMETER. 

{SEPERATE LINE NUMBER FIELD OF PASSED PARAM. 

{PUT LINE NUMBER FIELD IN LSBYTE. 

{SHIFT THE LINE NUMBER FIELD INTO THE PROPER 

j POSITION TO USE IT AS A WORD TABLE OFFSET 

j FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 

jGET BIT MAP OF LINE TO TEST FROM TABLE. 

{INDICATE THAT THE BIT SHOULD BE CLR. 

{WAIT FOR THE BIT TO BE CLR WITHIN TIME-OUT. 

j CARRY IS CORRECT UPON MSLGET RETURN, 

; PASS LAST VALUE READ AS OUTPUT PARAMETER. 

{RESTORE GPRS, EXCEPT THE FOLLOWING: 

R2.R2SLC (SP) {PUT R2 IN STACK SLOT. 

PC,3(SPV {RETURN TO PREG05 SU6RT 

5 R2 - LAST VALUE READ LOOKING FOR CONDITION. 

j CARRY - SUCCESS FLAG (SET IF BIT FOUND CLR). 



SEQ 77 



N6 
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SEQ 78 



3026 
3027 
3026 
3029 
3030 
3031 
3032 
3033 
3034 
3035 
3036 
3037 
3038 
3039 
3040 
3041 
3042 
3043 
3044 
3»5 
3046 
304 7 
3048 
3049 
3050 
3051 
3052 
3053 
3054 

3055 
3056 
3057 
3058 
3059 
3060 
3061 
3062 
3063 
3064 
3065 
3066 
306 7 
3068 



3069 
3070 



011354 
011354 
011360 
011362 
011364 
011370 
011374 
011376 
011400 
011402 
011404 
011410 
011412 

011416 

011420 
011420 
011424 



004567 
010204 
010102 
042701 
042702 
000302 
006202 
006202 
006202 
016202 
010203 
004 767 

010002 

010266 

004 7 36 



172440 



170000 
007777 



002310 
176564 

000006 



.SB 

i * * 

{♦ 
J* 

;* 
; + 

5 + 

j* 
j* 
;* 

5* 

J* 
5* 
!* 
J* 
! + 

;♦ 

;* 

:* 
{♦ 

}* 
i + 

5* 

; + 
j * 



TTL GLOBAL SUBROUTINE - WAIDIS - 

- WAIT FOR BIT SET ROUTINE - 
THIS SUBROUTINE WAITS FOR THE SPECIFIED BIT TO BECOME SET. IF THE 
SPECIFIED BIT GOES TO A SET STATE WITHIN THE SPECIFIED TIME-OUT 
PERIOD A SUCCESS INDICATION IS RETURNED BY THIS ROUTINE. 
THE LAST VALUE WHICH IS READ LOOKING FOR THE CONDITION IS RETURNED TO 
ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 



INPUTS? 



OUTPUTS: 



Rl - TIME-OUT VALUE AND BIT NUMBER INDICATION: 

BITS 15 THRU 12 - NUMBER OF BIT TO TEST CRANGE THRU 15). 
BITS 11 THRU - TIME-OUT VALUE IN MILLI-SECONDS (4095 MAX) 

R? - ADDRESS OF WORD CONTAINING THE BIT TO TEST. 
MSLCNT. 

R2 THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
CARRY - SUCCESS FLAG (CARRY SET IF BIT SET BEFORE TIME-OUT). 



CALLING SEQUENCE 



COMMENTS: 



MOV 0130040. Rl 

MOV 4LAE<EL,R2 
JSR PC.WAIBIS 



PASS BIT 11 (13 OCTAL) AND 

32 (40 OCTAL) MS DELAY. 
TEST BIT IN WORD AT "LABEL". 
{WAIT 32 MS FOR BIT 11 TO SET 



SUBORDINATE ROUTINES CALLED: MSLGET. 



WAIBIS:: SAVE 



60*: 





JSR 


MOV 


R2,R4 


MOV 


R1.R2 


BIC 


0170000, Rl 


BIC 


07777.R2 


SWAB 


R2 


ASR 


R2 


ASR 


R2 


ASR 


R2 


MOV 


BITTBL(R2),R2 


MOV 


R2.R3 


JSR 


PC, MSLGET 


MOV 


R0.R2 


PASS 


R2 




MOV 




JSR 



J. 1426 000207 



RTS 



PC 



{SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 {CALL REGISTER SAVE SUBRT. 
{SET UP THE ADDRESS PARAMETER FOR MSLGET. 



jSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
jSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
{PUT LINE NUMBER FIELD IN LSBYTE. 
{SHIFT THE LINE NUMBER FIELD INTO THE PROPER 
: POSITION TO USE IT AS A WORD TABLE OFFSET 
j FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 

CET BIT MAP OF LINE TO TEST FROM TABLE. 

INDICATE THAT THE BIT SHOULD BE SET. 

WAIT FOR THE BIT TO BE SET WITHIN TIME-OUT. 
CARRY IS CORRECT UPON MSLGET RETURN. 

PASS LAST VALUE READ AS OUTPUT PARAMETER. 

RESTORE GPRS, EXCEPT THE FOLLOWING: 
R2.R2SL0KSP) :PUT R2 IN STACK SLOT. 

PC ( 8)(SP)» {RETURN TO PREG05 SUBRT 

{ R2 LAST VALUE READ LOOKING FOR CONDITION. 
I CARRY - SUCCESS FLAG (SET IF BIT FOUND SET). 



B/ 
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30 72 
3073 
30 74 
30 75 
30 76 

30 .' : 

3078 
3079 

3080 
3081 
308c 1 
3083 
3084 
308 :> 
3086 
3087 
3088 
30a 1 -") 
3090 
3091 
3092 
3093 
3094 
3095 
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SEQ 79 



.SBTTL GLOBAL SUBROUTINE - WTWLNC - 

* *+*****************************************************************«******* 

- LINE CONTROu REGISTER SETUP ROUTINE 
THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (OUT) LINE 
CONTROL REGISTERS (LNCTRL) TO THE SPECIFIED STATE, ONLY THE LNCTRLS 
FOR THE SPECIFIED LINES ARE ALTERED. 

INPUTS: RO - NEW LIHE PARAMETERS. 

RS BIT MAP OF LINES TO BE ALTERED. 

CSRA - CONTAINS ADDRESS Of THE OUT CSR. 

IESTAT - CONTAINS THE CURRENT STATE OF THE TX ANO RX INTERRUPT 

ENABLE BITS IN THE CSR. 
LNCTRA - CONTAINS ADDRESS OF THE OUT LNCTRL REGISTERS, 

OUTPUTS i LNCTRL - SPECIFIED OUT LINE CONTROL REGISTERS ARE ALTERED. 

CALLING SEQUENCE* JSR PC, WTWLNC 

COMMENTS: 

SUBORDINATE ROUTINES CALLED? ALTFLD. 



309t> 
3097 
3098 
3099 
3100 
3101 
310? 
3105 
3104 
31 OS 
310* 
3107 
3108 

3100 



011430 
011430 



011434 

011440 
01144? 
011444 



00456V 172364 



016701 170550 

010002 

010503 

012704 177777 



WTWLNC:: SAVE 



j SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBRT. 



011450 004 767 175714 



J ♦ 

l SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 

MOV LNCTRA.R1 | SET UP THE REGISTER ADDRESS PARAMETER, 

MOV R0,R2 j SET UP THE DESIRED REGISTER CONTENTS. 

MOV R5.R3 |SET LP THE BIT MAP 0* LINES TO ALTER. 

MOV • «..R4 i SELECT ALL REGISTER BITS To BE ALTERED. 

i ♦ 

I CALL THE SUBROUTINE WHICH ALTERS THE REGISTFR CONTENTS. 

i - 

JSR PC, ALTFLD t ALTER THE REGISTER CONTENTS. 



011454 
011454 
011456 



004 7 36 
000207 



60*1 



PASS 
RTS 



PC 



iRE'STORE GPRS, 
JSR PC.8CSP)* 



RETURN TO PREG05 SUQRT, 



i®M&>mMxhu%o!>m*« n m tfm* 00 
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SEU 60 



3111 








31V 








3113 








5114 








3115 








311b 








3117 








3118 








311^ 








3120 








3121 








3122 








3123 








3124 








3125 








3126 








3127 








3l2tt 








3129 








3130 








3131 








3132 








3133 








3134 


011460 


00576 7 


170602 


3155 


011464 


001402 




3136 


011466 


005367 


170574 


313/ 


011473 


005767 


170572 


3138 


011476 


001402 




3139 


011500 


005367 


170564 


3140 


011504 


005367 


170562 


3141 


011510 


001006 




3142 


011512 


016767 


170556 


3143 


011520 


010046 




3144 


011522 








011522 


104422 




3145 


011524 


012600 




3146 


011526 


000002 





SBTTL INTERRUPT SERVICE ROUTINE - CI.KINT - 

. it************************************************************************* 
THIS ROUTINE IS EXECUTED CLKHRZ TIMES PER SECOND. IT DECREMENTS THE 
TWO TIMER COUNTERS DOWN TO ZERO. 

INPUTS: TIMER! • TIMER COUNTER 01, 

TIMERS - TIMER COUNTER 02. 
TIMER3 - TIMER COUNTER FOR CALL OF BREAK MACRO. 

OUTPUTS j THE 2 TIMER COUNTERS ARE DECREMENTED IE THEY ARE NOT ZERO. 



CALLING SEQUENCE} 



PUT JCLKINT IN THE CLOCK INTERRUPT VECTOR SLOT. 
PUT THE DESIRED TIME PERIOO CSECONOS TIMES CLKHRZ) IN 
EITHER TIMER1 OR TIMER2 ANO POLL THE RESPECTIVE TIMER 
COUNTER TO DETECT ITS GOING TO ON TIME-OUT. 



COMMENTS? THE 2 COUNTERS WILL NOT WRAPARCKW) BUT WILL 

ALLOWS THE DETECTION OF A TIME-OUT ANY TIME 
HAS OCCURRED UNTIL THE TIMER COUNTER IS SET 



STOP AT 0. THIS 
AFTER THE TIME-OUT 
TO ANOTHER VALUE. 



SUBORDINATE ROUTINES CALLED; NONE, 

**#****#*****#*** ******A**4********A*#A#**A************* *********** 4 + ****** 



CLKINT 



2* 



At 



170552 



60*{ 



TST 


TIMER! 


BEQ 


?* 


DEC 


TIMER1 


TST 


TIMER2 


BEQ 


4$ 


DEC 


TIMER2 


DEC 


TIMER3 


BNL 


60$ 


MOV 


BCOUNT.T 


MOV 


RO.-(SP) 


BREAK 




MOV 


<SP)».RO 


RTI 





TIMER3 



j CHECK FOR 
i BRANCH TO 
jUECREMENT 
iCHECK FOR 
iBRANCH TO 
iDECREMENT 
t DECREMENT 
(EXIT IF NOT 
ISET UP TIME 



TIMER1 AT ZERO. 

LEAVE IT AT ZERO IF IT IS ZERO. 

TIME COUNT. 

TIMER2 AT ZERO. 

LEAVE IT ALONE IF IT'S ALREADY ZERO 

TIME COUNT. 

THE BREAK COL^T. 

TIME TO CALL BREAK. 

TILL NEXT BREAK, 



iSAVE CONTENTS OF RO FROM BREAK MACRO* 
I CHECK FOR OPERATOR CONTRQL/C. 



iRESTORE CONTENTS OF Rg. 



TRAP CIBRK 



CZDHWftO DHU-U rUNC 1ST PART3 
GLOBAL TRAP SERVICE ROUTINE 

3148 
3149 
3150 
3151 
3152 
3153 
315-1 
3155 
3156 
315? 
3158 
3159 
3160 
3161 
3162 
3163 
3164 
3165 
3166 
3167 
3168 
3169 
3170 
3171 

3172 011530 021627 010010 

3173 011534 001402 

3174 011536 000177 170506 

3175 011542 052767 1QQO0O 

3176 011550 000002 



MACRO M1200 
• TP4RTN - 
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SEQ 81 



TTL GLOBAL TRAP SERVICE ROUTINE - TP4RTN 

BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE - 

THIS ROUTINE DETERMINES IF THE 004 TRAP WAS CAUSED BY 

AN "EXPECTED" ERROR OR NOT BY EXAMINING THE RETURN PC VALUE ON THE 

STACK. IE THE TRAP IS UNEXPECTED, THIS ROUTINE JUMPS TO THE NORMAL 

DIAGNOSTIC SUPERVISOR 004 TRAP HANDLING ROUTINE, 



SB 

* 
* 
* 

♦ INPUTS: 

* 



OUTPUTS: 



SP - POINTS TO THE PC WHERE THE TRAP OCCURED, 

ADRPTR - LABEL AT THE ADDRESS WHERE "EXPECTED" TRAPS OCCUR. 

TP4FLG - 004 TRAP FLAGS. 

TP4FLG - BIT 15 IS SET IF "EXPECTED" TRAP OCCURED, 



CALLING SEQUENCE: 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE. 



PUT ADDRESS POINTED TO BY TP4RTN IN 004 VECTOR. 
OCCURENCE OF 004 TRAP VECTORS TO THIS ROUTINE. 

ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 
ADRPTR WILL BE HANDLED BY THE NORMAL 004 TRAP SERVICE ROUTINE. 



** 



TP4RTN: 



170502 a*; 



: CMP 

BEQ 

JMP 

BIS 

RTI 



(SP),*ADRPTR 

STP4VEC 
*BIU5.TP4FLG 



{COMPARE EXPECTED ADR AGAINST TRAP RET PC. 

I IK THEY MATCH, CONTINUE THIS ROUTINE. 

I IF NOT, JUMP TO NORMAL 004 TRAP SERVICE RTN, 

t SFT THE 004 TRAP OCCURED FLAG. 

I ALL DONE, GO BACK TO THE TEST. 



E7 



CZDHW80 DHU-11 TUNC TST PART3 
GLOBAL TRAP SERVICE ROUTINE 



3185 
3186 

3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 

3195 
3196 
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.SBTTL REPORT COOING SECTION 



{ ♦ * 



SEQ 82 



{ THE REPORT COOING SECTION CONTAINS THE 

j "PRINTS" CALLS THAT GENERATE STATISTICAL REPORTS. 



3197 
3198 
3199 
3200 



011552 
011552 

011552 
011552 
011554 



011556 
011556 
0X1556 



000167 
000000 



BGNRPT 
EXIT 

.EVEN 
ENDRP1 



LSRPT: • 



RPT 



.WORD JSJMP 
.WORD L10010-2 



104425 



L10010: 



TRAP CSRPT 



F7 



CZOHWBO DHU- 



PROTECTION TABLE 


5202 






3210 






3211 






3212 






3213 






3214 






3215 






3216 






3217 


011560 
011560 




3218 






3219 


011560 


177777 


3220 


011562 


177777 


3221 


011564 


177777 


3222 






3223 


011566 




3224 
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.SBTTL PROTECTION TABLE 



SEU 83 



j THIS TABLE IS USED BY THE RUNTIME SERVICES 
j TO PROTECT THE LOAD MEDIA. 



BGNPROT 



-1 

-1 
-1 

ENDPROT 



L*PROT. ; 

{OFFSET INTO P-TABLE FOR CSR ADDRESS 
lOFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
{OFFSET INTO P-TABLE FOR DRIVE NUMBER 



fiMiBH u iMii UNC 



G7 
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SEQ 84 



3246 
3247 
3248 
3249 
3250 
3251 
3252 
3253 
3254 
3255 
3256 
3257 
3258 
3259 
3260 

3261 
3262 



3263 

3264 
3265 



3266 

3267 
3268 



3269 

3270 
3271 



3272 

3273 
3274 
3275 

3276 

3277 
3278 
3279 



3280 
3281 
3282 
3283 
3284 
3285 



011566 
011566 

011566 
011566 
011572 
011574 
011574 

011576 
011576 
011602 
011604 
011604 

011606 
011606 
011612 
011614 

011614 

011616 
011616 
011622 
011524 
011624 
011626 
011632 
011632 
011632 



011634 
011634 

011640 
011642 
011644 
011650 
011654 
011660 
011664 
011672 



012700 
104447 

103416 



012700 
104447 

103556 



012700 
104447 

103555 



012700 
104447 

103161 
000167 



104433 



012700 
104462 
010001 
012167 
012167 
012167 
012167 
02672 7 
001004 



.SBTTL INITIALIZE SECTION 

i ♦♦ 

. + *+*++* + +. + +++* + + + + + + + + +++ ++*++++*++ + ++*+ + + + + + + *+ + +++ + + *. + *+ +++*+,+*+ + ++++. + **++.++ 

{* THIS SECTION CONTAINS THE CODE WHICH IS PERFORMED AT THE BEGINNING OF 

}+ EACH PASS OR AFTER A CONTINUE COMMAND, 

{* THIS CODE PERFORMS THE FOLLOWING ACTIONS: 

; + 

j* MOVES THE INFORMATION HELD IN THE HARDWARE P-TABLE INTO THE GLOBAL 

i* DATA AREA. 

J* 



000040 



BGNINIT 

;SEE IF PROGRAM JUST STARTED , BR IF YES 
READEF 0EF, START 



L$INIT:j 



BCOMPLETE 



NEWSTA 



000037 



000035 



{SEE IF PROGRAM JUST RESTARTED, BR IF YES 
READEF 0EF. RESTART 



BCOMPLETE 

j SEE IF THIS IS A NEW PASS, BR IF YES 
READEF 0EF.NEW 



MOV OEF. START, RO 
TRAP C*REFG 

BCS NEWSTA 



MOV ^EF. RESTART, RO 
TRAP C*REFG 

BCS NEWRES 



BCOMPLETE 



NEWPAS 



000036 



000522 



» SEE IF PROGRAM WAS JUST CONTINUED 
READEF ^EF. CONTINUE 



NEWSTA: 



BNCOMPLETE 
JMP ENDIT 
BRESET 



GETPRM 



MOV 
TRAP 


OEF.NEW.RO 
CSREFG 


BCS 


NEWPAS 


MOV 
TRAP 


OEF.CONTINUE.RO 
C$PEFG 


BCC 


GETPRM 


1. INTERRUPTS. 
TRAP CSRESET 



000114 



170406 
170404 
170402 
170400 
17Q374 



; SET UP FOR LINE TIME CLOCK INTERRUPTS. 

CLOCK L.R1 {GET THE CLOCK PARAMETERS. 

MOV 
TRAP 
MOV 
t STORE CLOCK CSR ADDRESS. 



000062 



MOV CR1)*,CLKCSR 

MOV (R1)*.CLKBRL 

MOV (Rl)*,CLKVEC 

MOV (R1)*,CLKHRZ 

CMP CLKHRZ.050. 

BNE 2$ 



O'L.RO 
CJCl.CK 
R0 ( R1 



{STORE CLOCK BUS REQ INT LEVEL 
{STORE CLOCK INTERRUPT VECTOR. 
{STORE CLOCK FREQUENCY, 
{TEST FOR 50HZ LINE FREQUENCY, 
{BRANCH IF CLOCK IS NOT 50H£, 



CZDHWBO DHU-ll TUNC TST PART3 
INITIALIZE SECTION 



3286 

3287 
3288 
3289 



3290 
3291 
3292 
3293 



3294 
3295 
3296 
3297 
3298 
3299 
3300 
3301 
3302 
3303 
3304 
3305 
3306 
3307 
3308 
3309 
3310 
3311 
3312 
3313 
3314 
3315 
3316 
3317 
3318 
3319 
3320 
3321 
3322 
3323 
3324 
3325 
3326 
332/ 
3328 
3329 
3330 
3331 
33 52 
3333 
3334 



011674 
011702 
011704 
011712 

011712 
011716 
011722 
011726 
011732 
011734 
011740 
011744 
011746 
011752 
011752 
011756 



011760 
011766 



011774 
012000 
012006 
012012 
012016 
012022 
012030 
012032 
012036 



012044 
012052 
012060 
012064 
012070 
012074 
012100 
012104 
012110 
012114 
012122 
012124 
01213? 
012136 



012767 
000403 
012767 

012746 
012746 
016746 
012746 
104437 
062706 
016700 
006300 
010067 

012700 
104441 



016767 
012767 



005067 
012767 
012700 
016701 
004 76 7 
016767 
103403 
005067 
000402 



016767 
012767 
005067 
00506 7 
012700 
016701 
005067 
005067 
004767 
016767 
103003 
012767 
00506 7 
000167 



000024 

000021 

000300 
011460 
170334 
000003 

000010 
170320 

170322 

000240 



166020 
011530 



170252 
000100 
002254 
170240 
175754 
170222 

170226 



012040 004767 175506 



165734 
011530 
170166 
170164 
002254 
170202 
170200 
170176 
175662 
170130 

000001 
170100 
000006 
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SEQ 85 



170374 
170364 



170262 
166010 



170246 



165754 



2$ 

4$ 



MOV 020..MSTICK 

BR 4* 

MOV 017..MSTICK 

SETVEC CLKVEC . 0CLKINT , 0PRI06 



{INDICATE 20MS PER CLOCK TICK. 

I INDICATE 17 MS PER CLOCK TICK. 
{INITIALIZE CLOCK INTERRUPT VECTOR. 



MOV 


CLKHRZ,RO 


ASL 


RO 


MOV 


RO.BCOUNT 


5ETPRI 


#PRI05 



j ENABLE THE LINE 
! IS ACCESSABLE. 
FIRST SET UP 



i 
I - 



{INITIALIZE THE BREAK 
i TO CAUSE A BREAK 
{ EVERY 2 SECONDS. 
{ALLOW CLOCK INTERRUPTS 



TIME CLOCK (LTC) CHECKING TO MAKE SURE THAT THE CSR 
TO CATCH ANY 004 TRAPS WHICH OCCUR: 



MOV 


OPRI06.-CSP) 


MOV 


OCLKINT. -CSP) 


MOV 


CLKVEC, -CSP) 


MOV 


03, -CSP) 


TRAP 


C$SVEC 


ADD 


010, SP 


COUNT 




S DISABLE 


OTHERS. 


MOV 


0PRI05.R0 


TRAP 


CSSPRI 



MOV 
MOV 



4,TP4VEC 
0TP4RTN,4 



{SAVE THE EXISTING 004 TRAP VECTOR. 
{SET 004 TRAP VECTOR TO OUR SERVICE 



RTN ADR. 



ENABLE LTC CHECKING FOR 004 TRAP IN CASE CSR IS NOT THERE 



CLR TP4FLG 

MOV *BIT6,W0RD1 

MOV *UORD1,RO 

MOV CLKCSR.R1 

JSR PC.CKTRAP 

MOV TP4VEC,4 

BCS 6$ 

CLR CLKHRZ 

BR 8$ 



{CLEAR THE 004 TRAP FLAG. 

,SET UP TO SET BIT6 OF THE LTC CSR. 

{SET UP U0RD1 AS THE CKTRAP MOVE SOURCE, 

,SET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE 

{MOVE AND CHECK FOR TRAP. 

{RESTORE THE NORMAL 004 TRAP VECTOR, 

{IF NO TRAP, LTC IS THERE SO CONTINUE. 

{CLEAR LTC FREQUENCY WORD TO INOICATE NO LTC. 

{BYPASS THE FOLLOWING CALIBRATION PROCEDURES. 



j CALIBRATE THE DELAY ROUTINE MILLI -SECOND DELAY COUNT VALUE. 



6$: 



JSR 



PCCALMSL 



CHECK FOR MEMMORY MANAGEMENT PRESENT ON THI5 MACHINE. 
IF MEM MGT IS PRESENT, DISABLE IT. 



170176 
165724 



8$: 



165662 
170152 



10$: 



MOV 


4.TP4VEC 


MOV 


0TP4RTN.4 


CLR 


TP4FLG 


CLR 


W0RD1 


MOV 


<MJ0RD1,R0 


MOV 


MMSR0.R1 


CLR 


MMPRES 


CLR 


MMENAB 


JSR 


PC.CKTRAP 


MOV 


TP4VEC.4 


BCC 


101 


MOV 


#1. MMPRES 


CLR 


PASCNT 


JMP 


NEWPAS 



(SAVE THE EXISTING 004 TRAP VECTOR. 

{SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 

{CLEAR THE 004 TRAP FLAG. 

{PREPARE TO CLEAR THE MEM MGT SRO REGISTER. 

{SELECT CLEARED WORD AS CKTRAP RTN SOURCE. 

{SELECT MEM MGT SRO REGISTER AS DESTINATION. 

{INDICATE NO MEM MGT PRESENT IN CASE IT ISN'T 

{INDICATE MEM MGT IS NOT ENABLED. 

{CLEAR THE MEM MCT SRO REG ANO CHECK FOR TRAP 

{RESTORE THE NORMAL 004 TRAP VECTOR. 

{SKIP INDICATING MEM MGT PRESENT IF IT ISN'T. 

{INDICATE THAT MEM MGT IS PRESENT. 

{CIR COUNTER USED IN REPORTING ROM VERSION *, 

{SKIP AROUND THE BUS RESET, IT'S BEEN DONE. 



CZDHWBO 
INITIALIZE 



DHU-11 f'UNC 
SECTION 
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3535 

3336 

3337 
3338 
3339 
3340 
3341 
3342 
3343 
3344 
3345 
3346 
334? 
3348 
3349 
3350 
3351 
3352 
3353 
3354 



3355 

3356 
3357 
3358 
3359 
3360 
3361 
3362 
3363 
3364 
3365 
3366 
3367 
3368 
3369 
3370 
3371 
3372 
3373 
3374 
33/5 
3376 
3377 
3578 
3379 
3380 
3381 
3382 
3 383 
3384 
3385 
3386 



012142 
012142 
012144 
012150 
012150 



012156 
012162 
012164 



012170 
012170 
012174 
012202 

012204 
012204 
012210 
012212 
012214 
012214 
012216 



012220 
012224 
012230 



012234 
012240 
012242 
012244 
012250 
012254 
012256 
012260 
012262 
012264 



012272 
012276 
012302 
012304 
012306 



104433 
005067 

012767 



005267 
001002 
005367 



005267 
026767 
002362 



016700 
104442 
010001 

103401 
000764 



012167 
012167 
111167 



016701 
005201 
005201 
012703 
012702 
010122 
005201 
005201 
005303 
001373 



012700 
012701 
010C67 
005020 
020001 
103775 
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SEQ 86 



170066 
177777 

170054 
170046 



170002 
167776 



167766 



NEWRES; DRESET 

CLR 



170020 



NEWPAS; 



MOV 



PASCNT 
0-1, UNITN 



j RESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 

TRAP C$RESET 
{CLR COUNTER USED IN REPORTING ROM VERSION 0. 

iRESET LOGICAL DEVICE TO -1 



I INCREMENT THE PASS COUNTER, CORRECT FOR ANY OVERFLOW, 
i THIS COUNTER IS USEO IN THE ROM VERSION TEST. 



INC 
8NE 
DEC 



PASCNT 
GETPRM 
PASCNT 



{INCREMENT THE PASS COUNTER. 

{BRANCH IF WE HAVE NOT YET! OVERFLOWED. 

jSET PASS COUNT TO 177777 OCTAL. 



167610 



{ GET THE HARDWARE PARAMETERS FOR THIS UNIT. 
GETPRM; 

INC UNITN 

CMP UNITN, L$UNIT 

BGE NEWPAS 



{INCREMENT LOGICAL DEVICE NUMBER 
{SEE IF MAXIMUM UNIT NO. EXCEEDED 
}BR IF YES 



GPHARD UNITN, Rl 

BCOMPLETE 30$ 
BR GETPRM 



{GET P-TABLE POINTER INTO Rl 

jBR IF DEVICE AVAILABLE 
iSKIP THIS DEVICE 



MOV 

TRAP 

MOV 

BCS 



UNITN. RO 

CJGPHRD 

R0.R1 

30$ 



167 754 
167742 
167740 



167740 



000007 
002202 



30$ 



.**♦***+**** HARDWARE PARAMETER MOVING CODE ******♦**♦****♦♦ 

MOV (R1)*,CSRA {STORE DHU-11 CSR ADDRESS IN DEV . REG . ADDRESS TABLE 



MOV CR1)*,ACTLNS 
MOVB (Rl).LOPBCK 



{STORE DHU-11 ACTIVE LINE BIT 
{STORE DHU-11 LOOPBACK MODE 



MAP 



12$ 



CALCULTATE DEVICE REGISTER ADDRESSES .AND PUT THEM IN THE 
DEVICE REGISTER ADDRESS TABLE. 

{COPY CSR ADDRESS 

j INCREMENT CSR ADDRESS 

, COPY BY 2, 

{SET UP REGISTER COUNT 

{GET LOCATION WHERE RBUF ADDRESS GOES IN TABLE 

{STORE REGISTER ADDRESS IN TABLE 

{INCREMENT REGISTER ADDRESS 

j BY 2, FOR THE NEXT DEVICE REGISTER. 

{DECREMENT REGISTER COUNT 

j LOOP IF NOT DONE 



00235,. 
002552 
170046 



MCV 


CSRA,R1 


INC 


Rl 


INC 


Rl 


MOV 


07, R3 


MOV 


0RBUFA,R2 


$ ; MOV 


R1.CR2)* 


INC 


Rl 


INC 


Rl 


DEC 


R3 


BNE 


12$ 


INITIALISE 


THE BMP CODE 


MOV 


OBMPCQB.RO 


MOV 


0BMPCQE.R1 


MOV 


RO.BMPCQP 


% : CLR 


CRO)» 


CMP 


R0.R1 


BLO 


14$ 



QUEUE 



{GET THE START ADDRESS OF THE QUEUE. 
{GET THE END ADDRESS OF THE QUEUE. 
{SET THE POINTER TO THE STARf OF THE QUEUE 
{CLEAR OUT THE CONTENTS OF THE QUEUE.. 
{CHECK IF END OF QUEUE HAS BEEN REACHED. 
{LOOP IF NOT ALL DONE, 



C2DHWB0 DHU-11 TUNC TST PART3 
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3387 
3388 
3389 
3390 
3391 
3392 
3393 
3394 
3395 



3396 
339 7 

3398 
3399 
3400 
3401 
3402 



3403 



3404 
3405 



012310 
012316 
012320 
012326 
012330 
012330 
012334 
012340 
012344 
012346 
012350 
012354 



032767 
001416 
026727 
003412 

016746 
012746 
012746 
010600 
104417 
062706 



012354 005067 



012360 

012360 
012364 
012366 
012366 
012366 



012700 
104441 



104411 
000000 



000020 
167466 



167642 
004601 
000002 



000006 
167642 

000340 
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SEQ 87 



167644 
000001 



REPORT THE UNIT NUMBER IE THE SOFTWARE P-TABLE QUESTION WAS ANSWERED YES, 
AND THE MAXIMUM UNIT NUMBER IS GREATER THAN 1, 

{CHECK IF THE QUESTION WAS ANSWERED YES. 

{SKIP REPORTING Uf- ,T T NUMBER IF IT IS DISABLED. 

{CHECK MAXIMUM NUMBER OF UNITS SELECTED. 

iDO NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 

{REPORT UNIT NUM8ER. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



BIT 


06IT4, OPTION 


BEQ 


16$ 


CMP 


L$UNIT,01 


BLE 


16$ 


PRINTF 


OMFUNIT,UNITN 



16$: 
ENDIT: 



UNITN.-(SP) 
OMf UNIT, -(SP j 
02, (SP) 

SP.RO 
C*PNTF 

06, SP 



CLR 



CTRLCF 



iCLR THE CTRL-C TEST ABORT FLAG. 



SET THE PROCESSOR PRIORITY TO DISABLE ALL INTERRUPTS. 



SETPRI 0PRI07 

ENDINIT 



{SET PROCESSOR PRIORITY TO 7 

MOV 
TRAP 



L10012: 



TRAP 



$PRI07,R0 
CSSPRI 



CSINIT 



TNUM 







{INITIALISE THE ASSEMBLER TEST NUMBER VARIABLE. 



SfflWKiWs«Ti8S c rsT PART 
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SEQ 88 



34 14 

34 15 
34 16 
34 1 7 
3418 
3419 
3420 
3421 
3422 
3423 
3424 
3425 
3426 

342" 
34 34 

3435 



SBTTL. AUTODROP SECTION 



THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE 
THE "ADR" FLAG WAS SET. THE UNITCS) UNDER TEST ARE CHECKED 
SEE IF THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY 
DROPPED FROM TESTING. 



IF 
TO 



012370 
012370 



012370 
012370 
012370 



BGNAUTO 



ENDAUTO 



L$AUTO: : 



104461 



L10013: 



TRAP 



C5AUT0 



S6?8B88p D §fc4or c rsT pflRT3 
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SEQ 09 



3444 
3445 
3446 
3447 
3448 
3449 
3450 
3451 
3452 
3453 

3454 
3455 
3456 

3457 

3458 
3459 
3468 
3469 



3470 
3482 
3483 
3484 
3485 



012372 
01237«? 

012372 
012376 
012400 
012400 
012402 



012406 
0124 06 
012406 



.SBTTL CLEANUP CODING SECTION 



THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 



005767 
001401 

104433 



167624 



BGNCLN 



T5T CTRLCF 
BEQ 2$ 
BRESET 



L$ CLEAN: 



TEST? 



jDID WE GET HERE BY CTRL-C FROM 
iCTRL-C FROM TEST? NO, SKIP BUS RESET 
• ( YES, CLR ANY DMAS OR OUTSTANDING 

TRAP 



INTERRUPTS 



2$: 



012402 

012402 104432 

012404 000002 



EXIT 

.EVEN 
ENDCLN 



CLN 



TRAP 
.WORD 



C5RESET 



CJEXIT 
L10014- 



104412 



L10014: 



TRAP 



C$CLEAN 



M7 



mm mt& mi& 



3494 
3495 
3496 

3497 
3498 
3499 
3500 
3501 
3502 
3503 

3504 
3505 



3506 
3507 
3508 



3509 
3510 
3511 
3512 



3513 
3514 
3515 



012410 
012410 

012410 
012410 
012412 
012416 
012422 
012424 
012426 
012432 

012454 

012437 
012442 
012445 
012450 
012453 
012456 
012461 
012464 
012467 
012472 
012475 
012500 
012503 
012506 

012512 

012512 

012512 
012514 



012516 
012516 
012516 
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.SBTTL DROP UNIT SECTION 



010046 
012746 
012746 
010600 
104417 
062706 
000427 

045 
125 

124 
066 
040 
117 
105 
106 
115 
125 
110 
040 
123 
116 
045 



000167 
000000 



104453 



SEQ 90 



} THE DROP -UNIT SECTION CONTAINS THE COOING THAT CAUSES A DEVICE 
: TO NO LONGER BE TESTED, 



BGNDU 
PRINTF 0DROP.RO 



012434 
000002 



000006 



101 
116 
045 
045 
104 
120 
104 
122 
040 
122 
105 
124 
124 
107 
116 



040 DROP: 

111 

104 

101 

122 
120 
040 
117 
106 
124 
122 
105 
111 
056 
000 

EDROPi 



L*DU:: 

I REPORT UNIT THAT HAS BEEN DROPPED. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 
BR EDROP ;BRANCH AROUND THE MESSAGE. 

,ASCIZ/*A UNIT*D6*A DROPPED FROM FURTHER TESTING .UN/ 



RO.-(SP) 
♦DROP, -CSP) 
02, -(SP) 

SP,RO 

C5PNTF 
06,SP 



.EVEN 
EXIT 

ENDDU 



OU 



L10015? 



.UOrtD 
.WORD 



TRAP 



J$JMP 
110015-2 



C$DU 



N7 



CZOHWOO DHU-11 F'UNC TST PART3 
DROP UNIT SECTION 



3524 
3525 

3526 
3527 
3528 
3529 
3530 
3531 
3532 
3533 
3534 
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.SBTTl ADO UNIT SECTION 



♦ * 



SEQ 91 



; THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
i TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
{ TO THE TEST CYCLE. 



3535 
3536 



3537 
3538 
3539 
3540 
3541 



354, 



012520 
012520 

012520 

012520 000167 
012522 000000 



012524 
012524 
012524 104452 



BGNAU 
EXIT 

.EVEN 
ENDAU 



L$AU 



AU 



.WORD 
.WORD 



J$JMP 
L10016-2 



L10016; 



TRAP 



C*AU 



CZDHWHO DHL) li FUNC TST PART 3 
HARDWARE TtST - ADRA 



3544 

3545 
5546 
$54 7 
5548 
3549 
3550 
3551 
3552 
3553 
3554 
3555 
3556 
355 < 
3558 
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3559 
3560 
3561 
3562 
3563 
35S4 
3565 
3566 
3567 
3568 
3569 
35 70 
3571 
35 72 
35 73 
35 74 
35 75 
35 76 

357 7 
35?8 
35 79 
3580 
3581 
358? 
3585 
3584 
3585 
3586 

358 7 
3588 
3589 
3590 
3591 
3592 
3593 
3594 
3595 
35'>6 

359 7 
3598 
3^99 



012526 
012526 

012526 
012534 
012542 
012550 
012556 



012564 

012572 
012600 



012602 
012606 
012612 
012616 
012620 
012624 
012652 
012634 
012640 
012644 
012646 
012652 



012654 
012660 
012666 
012672 
012676 
012702 
012704 
012710 
Qld'tl'd 



oooooi 

012767 
012 767 
012767 
012 767 
012767 



016767 
012767 
005005 



016700 
012701 
004767 
103402 
052 705 
042767 
010100 
016701 
0O4 767 
105405 
052 705 
000434 



012702 
016767 

016700 
012/01 
004 76 7 

103402 
052 705 
010100 
016701 



000001 
177777 
000145 
004632 
006200 



165214 
011530 



167372 
013000 
175160 

100001 

0OO01 7 

167340 
175132 

100002 



000010 
167314 
0O0104 
0130O0 
1750 74 

i 00001 

000060 



SEQ 92 



167472 
16 7460 
171242 
171236 
171232 



167456 
165204 



ooouo 



. SBTTL HARDWARE TEST - ADRA 

* * 

- REGISTER ADDRESS TEST • 

THIS TEST VERIFIES THAT THE DEVICE REGISTERS WILL RESPONO TO THE PROPER 
UNIBUS HANDSHAKING SIGNALS WHEN ACCESSED, IF THE DHUU DOES NOV RESPONO 
TO THE ACCESS ATTEMPTS C IF THE DHUU IS AT THE WRONG ADDRESS, TOP EXAMPLE) 
THE 004 BUS TIME-OUT TRAP IS DETECTED BY THIS ROUTINE AND AN ERROR 
IS REPORTED. THIS TEST IS PERFORMED ON LINE ONLY. 



BGNTST 

TNUM ■ 
MOV 
MOV 
MOV 
MOV 
MOV 



TNUM ♦ 1 

OTNUH.TSTNUM 

# l.CTRLCF 

•101..ERRNBR 

♦EM010S.ERRMSG 

♦ER0101.ERRBLK 



Tl:: 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

iSET UP THE TEST NUMBER. CI) 

lINOICATE THAT WE ARE IN A TEST. 

iSET THE TEST ERROR NUMBER IN THE: TABLE. 

I SET UP THE TEST FAILURE MESSAGE IN THE TABLF . 

I SET -UP THE ERROR ROUTINE IN THE ERROR TABLE. 



i ♦ 



I SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 



MOV 
MOV 
CLR 



4.TP4VEC 
•TP4RTN,4 

R5 



jSAVE THE EXISTING 004 1RAP 
j SET 004 TRAP VECTOR TO OUR 
iCLEAR THE ERROR FLAGS. 



VECTOR. 
SERVICE 



RTN ADR. 



i HERE BFGINS THE LOOP TO TEST THE REGISTERS FOR A LINE. 

I FIRbT TE5T THE CSR ANO SET THE INO.ADR.REG (I.A.R) HMD. 



J - 



000146 4$} 



J 
J 
61 

8$ 



iO*i 



NOW. 



MOV 


CSRA.RO 


MOV 


♦521, Rl 


JSR 


PC.CKTRAP 


BCS 


41 


BIS 


#100001. R5 


BIC 


♦17,52* 


MOV 


Rl.RO 


MOV 


CSRA,R1 


J.^R 


PC.CKTRAP 


RCS 


61 


BIS 


* 100002 .R5 


BR 


40$ 


. wt 


TEST EACH REGISTER 


MOV 


#8. ,R2 


MOV 


CSRA 50» 


MOV 


50I.R0 


MOV 


#521, Rl 


JSR 


PC.CKTRAP 


ocs 


to* 


BIS 


0100001, R5 


MOV 


Rl.RO 


MOV 


501 t Rl 



j SET UP CSR AS THE CKTRAP MOVE SOURCE. 

» SET UP DESTINATION LOCATION FOR CKTRAP MOVE. 

iMOVE AND CHECK FOR TRAP. 

j IF NO TRAP, BYPASS ERROR. 

iSET FATAL R EAD ERROR FLAGS. 

iCLEAR THE I.A.R FIELD OF THE CSR DATA. 

I USE OLD DESTINATION FOR SOURCE OF CKTRAP MOVE 

iSET UP CSR AS THE CKTRAP MOVE DESTINATION, 

j MOVE ANO CHECK FOR TRAP. 

I If NO TRAP, BrPASS ERROR. 

iSET FATAL WRITE ERROR FLAGS. 

jEXIT AND REPORT FATAL ERROR. 

FOR THIS LINE. 

jINIT REGISTER COUNTER TO 8. 

I INITIALIZE THE REGISTER POINTER. 

I SET UP REGISTER AS THE SOURCE I OH CKTMAP MOVt 

iSET UP LOCAL STORAGE AS THE DES FOR CKTRAP. 

jPERFORM THE MOVE. CHECK FOR TRAP. 

\U NO TRAP, BYPASS THE SETTING OF ERROR H t\M 

iSET FATAl READ ERROR FLAGS. 

jUSt OLD DEST AS 5RQ FOR CKTRAP MOVE. 

I SET UP RtOIUTER AS THE, QEST FQR CKTRAP MUVL, 



CZDHWBO DHU-11 
HARDWARE TEST 



3600 
3601 
3*02 

3603 
3604 
3605 
3606 
360? 
3608 
3609 
3610 
3611 
3612 
3613 
3614 
3615 
3616 
361/ 
3616 
3619 

3620 
3621 

36?a 



3623 
3624 

3625 
3626 
3627 
3628 
3629 
36 30 
3631 
3632 
3633 



012?16 
012722 
012724 
012730 
012734 
012740 
012742 



012744 
012752 
012754 



012756 
012756 



012760 
012760 
012764 
012766 
012772 
012772 
012774 



012776 
013000 



013002 
013006 
013006 
013006 



TUNC TST 



004 767 
103402 
052705 
005267 
005267 
005302 
001351 



PART3 
- ADRA 

175054 

100002 
000042 
000036 



MACRO M1200 



016767 
005705 
100012 



104460 



016700 167212 

104451 

005067 167230 

104444 
000402 



000000 
000000 



005067 1672X4 



12$: 



i 



C8 
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JSR PC, CKTRAP 

BC5 121 

BIS 0100002, R5 

INC 501 

INC 50* 

DEC R2 

BNE 6* 



r ^(J 93 



i PERFORM THE MOVE, CHECK FOR TRAP. 

I IF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 

j SET FATAL WRITE ERROR FLAGS. 

I INCREMENT THE REGISTER 

j POINTER BY 2. 

jCOLfrU THE REGISTER. 

lLOOP TO TEST THE NEXT REGISTER ADDRESS, 



j DONE CHECKING DEVICE REGISTER ADDRESSES, 
I REPORT ANY ERRORS AND EXIT. 
I - 



167300 165032 40$ j 



i ♦ 



MOV 


TP4VEC.4 


TST 


R5 


BPl. 


60$ 



I RESTORE THE NORMAL 004 TRAP VECTOR. 
iChreCK THE ERROR FLAGS, 
■EXIT ROUTINE IF NO ERRORS, 



i REPORT "DEVICE REGISTER ACCESS TEST FAILED" 
ERROR 



TRAP 



DUDU 



CLR 

DOCLN 



BR 



UNITN 
OTRLCf 

601 



iDROP THIS UNIT FROM FUTHER TESTING, 

MOV 
TRAP 

j INDICATE NO CTRL -C ABORT FROM TEST. 

jABORT THIS SUB PASS. 

TRAP 

I 



CtERROR 



UNITN, RO 
C*DODU 



C*DCLN 



s **************** LOCAL STORAGE, ♦♦•♦♦***»•*•»•****»♦••*♦♦**♦»♦♦•*♦*♦*••♦• 

50*: .WORD jSTORAGE FOR THE SOURCE OR DEST Of" THE CKTRAP MOVE. 

52$: .WORD iSTORAGE FOR THE SOURCE OR DEST OF 1HE CKTRAP MOVE. 

I ******************* END #■&*.*+*******•****♦.♦♦•*•**•«•***♦♦*♦•*****♦*♦♦**** 



60$: CLR CTRLCF 
ENDTST 



104401 



iINOICATE THAT WE ARE NOT WITHIN A TEST. 

L10017J 

TRAP C$ETST 



D8 



SEQ 94 



3635 

3636 
3b 37 
3638 
3639 
3640 
3641 
3642 
364? 
3644 
364S 
3646 
364 7 

3646 
3649 
3650 
3651 
3652 
3653 
3654 



3655 
3656 
3657 
3656 
3659 
3660 
3661 
3662 
3663 
3664 
3665 
3666 
3667 
3668 
3669 
3670 
3671 
3672 
3673 
3674 
36 75 
3676 
367 7 
36 78 
3679 
3680 
3681 
3682 
3683 
3684 
3685 
3686 
3687 
3688 



013010 
013010 



013010 
013016 
013020 
013024 
013024 
013030 

013032 
013040 
013046 
013054 
013062 



013070 
013074 
013076 



032767 
001002 
000167 

012700 
104441 
000002 
012767 
012767 
012767 
012767 
012767 



000002 
000504 
000240 



OC0002 
177777 

000001 
017171 
004753 



167156 



004767 174732 

103402 

000167 000426 



013102 004767 174334 



013106 005003 

013110 010300 

013112 006300 

013114 036067 002310 

013122 001471 



013124 005000 

013126 012705 177777 



167166 
167154 
170734 
170730 
170724 



167050 



.SBTTL HARDWARE TEST - DTRMCS - 

DATA TERMINAL READY MODEM CONTROL SIGNAL TEST - 

THIS TEST VERIFIES THAT THE DTR MODEM CONTROL SIGNAL IS WORKING 
CORRECTLY. IT WILL ONLY BE PERFORMED IF EITHER 25 PIN OR STAGGERED 
LOOPBACK IS SPECIFIED. THIS TEST USES THE LOOPED BACK SIGNALS RI 
AND DSR TO TEST THE DTR SIGNAL. THIS TEST IS PERFORMED ON ALL 
ACTIVE LINES. 

BGNTST 

T2;; 
J ♦ 
I ONLY PERFORM THIS TEST IF THE DUT IS IN EXTERNAL OR STAGGARED LOOPBACK MODE. 

iCHECK TYPE OF LOOPBACK MODE SELECTED, 

j EXIT THIS TEST IF IN INTERNAL LOOPBACK. 
2$: SETPRI 0PRI05 |ALLOW LTC INTERRUPTS. 

MOV OPRI05.R0 
TRAP CfSPRI 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

jSET UP THE TEST NUMBER. (78) 

iINOICATE THAT WE ARE IN A TEST. 

I SET ERROR TYPE IN ERROR TABLE. 

I SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

tSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

RESET THE DUT TO A KNOWN STATE. REMOVE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS. 
THIS SUBROUTINE REPORTS ERROR >>>>> 7801 <<<<<. 



BIT 


OBIU.LOPBCK 


BNE 


2$ 


JMP 


601 


SETPRI 


0PRI05 


TNUM - 


■ TNUM - 1 


MOV 


OTNUM.TSTNUM 


MOV 


•-l.CTRLCr 


MOV 


Ol.ERRTYP 


MOV 


07801., ERRN6R 


MOV 


0EM78O1.ERRMSG 



JSR 
BCS 
JMP 



PC.CLNRST 

41 

601 



4$: 

* 



{RESET THE OUT. 

j ABORT THE TEST IF FATAL ERROR FOUND IN RESET. 
SET UP THE TX/RX ASSOCIATED LINE NUMBER TABLE. 



JSR 



PC.ASLNTL 



jSET UP THE ASSOCIATED LINE TABLES. 



SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

THIS LOOP CLEARS ALL THE DTRS ANO THEN SETS THEM INDIVIDUALLY AND WAITS FOR 

A RESPONSE ON THE ASSOCIATED RI ANO DSR SIGNALS. 
THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THE. ARE SET. 



6$: 



CLR 
MOV 
ASL 
BIT 
BEQ 



R3 

R3.R0 

RO 

BITTBL(RO),ACTLNS 



jCLEAR THE LINE COUNTER. 



12$ 



tDON'T TEST IF NOT ACTIVE LINE. 



I CLEAR ALL THE DUT LNCTRL REGISTERS DTR BITS. 



i 



CLR RO 

MOV 0MAPLNS.R5 



iSPECin THAT ALL. LNCTRL BUS TO BE CLEARED. 
I SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED, 



E8 
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SEQ 95 



3689 
3690 
3691 
3692 
3693 
3694 
3695 
3696 
3697 
3698 
3699 
3700 
3701 
3702 
3703 
3704 
3705 
3706 
3707 
3708 
3709 
3710 
3711 
3712 
3713 
3714 
3715 
3716 
3717 
3718 
3719 
3720 
3721 
3722 

3723 

3724 
^725 
3726 
3727 
3728 
3729 
3730 
3731 
3732 
3733 
3734 
3735 
3736 
3737 
3738 
3739 
3740 
3741 
3742 
3743 
3744 



013132 
013136 
013142 



013146 
013152 
013156 
013162 
013166 
013170 



013172 
013176 
013204 
013210 
013214 
013216 
013222 
013226 
013232 
013236 
013240 
013244 
013250 
013252 
013254 
013254 
013262 
013270 
013274 
013274 



013276 
013304 

013336 
013310 
013314 



013316 
013320 
013322 
013324 
013332 



004767 
012704 
004767 



116304 
010477 
017705 
012700 
040500 
001431 



010377 
052777 
012701 
032705 
001002 
012701 
016702 
010477 
004767 
103423 
017700 
042700 
040500 
001015 

012767 
012767 
012701 

104460 



032767 
001511 

005203 
020327 
002675 



176272 
000074 
174774 



003750 
167022 
167024 
120000 



167002 
001000 
150074 
1C0000 

170074 
166760 
166746 
176116 

166742 
057777 



017172 
006662 
005015 



005003 

010300 

006300 

036067 002310 

001472 



167004 



170530 
170526 



000100 166656 



000020 



166640 



JSR 

MOV 
JSR 



PC.WTWLNC 
060. ,R4 
PC, DELAY 



{CLEAR ALL THE OUT DTR BITS, 

{DELAY FOR 60 MS TO ALLOW SIGNALS TO SETTLE. 



I ♦ 

{ CHECK THAT AT LEAST ONE OF ASSOCIATED DSR OR RI IS CLEAR AND RECORD STATES, 

I - 

MOVB TXRLN8(R3),R4 ,GET THE ASSOCIATED LINE NUMBER. 
MOV R4.SCSRA {SELECT ASSOCIATED LINE IND.ADR.REG FIELD. 
MOV QFSLSA,R5 {GET THE STATE OF THE ASSOCIATED DSR, RI BITS. 
MOV 06IT15!BIT13,R0 

BIC H5,R0 {CHECK FOR BOTH DSR AND RI SET. 

BEQ 10$ {GO REPORT DTR IS BAD IF BOTH ARE SET. 

i ♦ 

i SET THE DTR FOR THE SELECTED LINE AND WAIT FOR EITHER DSR OR RI TO SET. 
t - 

{SELECT THE SELECTED LINE INO.ADR.REG FIELD. 

{SET THE SELECTED LINE DTR. 

{SPECIFY TO WAIT UP TO 60 MS FOR RI TO SET. 

{CHECK PREVIOUS STATE OF DSR BIT. 

{GO USE RI IF DSR BIT WAS NOT CLEAR. 

{SPECIFY TO WAIT UP TO 60 MS FOR DSR SET. 

{SPECIFY TO LOOK IN STAT REG FOR BIT TO SET. 

{SELECT ASSOCIATED LINE IND.ADR.REG FIELD. 

{WAIT UP TO 60 MS FOR SIGNAL TO GO SET. 

{SELECT NEXT LINE AND LOOP IF SIGNAL IS SET. 

{GET THE STATUS REGISTER CONTENTS. 

{REMOVE ALL BUT THE DSR ANO RI BITS. 

{TEST FOR SIGNAL ONCE CLEAR, BUT NOW SET. 

{GO LOOP IF SIGNAL HAS GONE FROM CLR TO SET. 
SIGNA! DEFECTIVE ON LINE NN. 

{SELECT THE ERROR NUMBER. 

{SELECT THE ERROR PRINT ROUTINE. 

{SELECT THE ERROR MESSAGE, 



8$: 



10$ 



12$: 



MOV 


R3.0CSRA 


BIS 


0BIT9,SLNCTRA 


MOV 


0150074, RI 


BIT 


06IT15,R5 


BNE 


8$ 


MOV 


0170074, RI 


MOV 


FSLSA.R2 


MOV 


R4,0CSRA 


JSR 


PCWAIBIS 


BCS 


12$ 


MOV 


QFSLSA.RO 


BIC 


O57777.R0 


BIC 


R5.R0 


BNE 


12$ 


{REPORT 


DTR MOOEM CONTROL 


MOV 


07802., ERRN8R 


MOV 


OER7801.ERRBLK 


MOV 


0EM7802,R1 


ERROR 




EXIT THE 


TEST IF EXTENDED 


BIT 


O0ITO6, OPTION 


BEQ 


60$ 


INC 


R3 


CMP 


R3.0NUMLNS 


BLT 


6$ 



TRAP 



C$ERROR 



{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

{SELECT THE NEXT LINE NUMBER. 

{TEST FOR ALL LINES DONE. 

{LOOP IF NOT ALL LINES DONE. 



SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

THIS LOOP SETS ALL THE DTRS ANO THEN CLEARS THEM INDIVIDUALLY AND WAITS FQR 

A RESPONSE ON THE ASSOCIATED RI AND DSR SIGNALS. 
THIS LOOP WILL CLEAR THE I'X.IE AND RX.IE BITS IF THEY ARE SET. 



14$: 



i ► 



CLR 
MOV 
ASL 
BIT 
BEQ 



R3 

R3,R0 

RO 

BITTBL(R0),ACTLNS 



{CLEAR THE LINE COUNTER. 



20$ 



jDON'T TEST IF NOT ACTIVE LINE. 



j SET ALL THE DUT LNCTRL REGISTERS DTR BITS. 



JKBB88 F .°^st 



1 FUNC TST PA 



3745 
3746 
3747 
3748 
3749 
3750 
3751 
3755 
3753 
3754 
3755 
3756 
3757 
3758 
3759 
3760 
3761 
3762 
3763 
3764 
3765 
3766 
3767 
3768 
3769 
3770 
3771 
3772 
3773 
3774 
3775 
3776 
3777 
3778 
3779 
3780 
3781 

3782 
3783 
3784 
3785 
3786 
3787 
3788 
3789 
3790 
3791 
3792 



3793 



013334 
013340 
013344 
013350 
013354 



013360 
013364 
013370 
013374 
013376 
013402 



013404 
013410 
013416 
013422 
013426 
013430 
013434 
013440 
013444 
013450 
013452 
013456 
013462 
013464 
013466 
013466 
013474 
013502 
013506 
013506 



013510 
013516 

013520 
013522 
013526 
013530 
013534 
013534 
013540 
013542 
013542 
013542 



012700 
012705 
004767 
012704 
004767 



116304 
010477 
017705 
010500 
042700 
001431 



010377 
042777 
012701 
032705 
001402 
012701 
016702 
010477 
004767 
103423 
017700 
042705 
040005 
001015 

012767 
012767 
012701 

104460 



032767 
001404 

005203 
020327 
002674 
005067 

012700 
104441 



104401 



- OTRMC! 



001000 
177777 
176060 
OOC074 
174562 



003750 
166610 
166612 

057777 



166570 
001000 
150074 
100000 

170074 
166546 
166534 
175630 

166530 
057777 



017173 
006662 
005015 



MACRO M1200 15-MAR-84 09:41 



F8 

PAGE 75-2 



SEQ 96 



MOV 08IT9.R0 

MOV 0MAPLNS,R5 

JSR PCWTWlNC 

MOV 060., R4 

JSR PC, DELAY 



{SPECIFY THAT DTR BITS ARE TO BE SET. 

; SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED 

}S£T ALL THE DUT DTR BITS. 

iDELAY FOR 60 MS TO ALLOW SIGNALS TO SETTLE 



CHECK THAT AT LEAST ONE OF ASSOCIATED DSR OR RI IS SET AND RECORD STATES. 



MOVB TXRLNB(R3:),R4 

MOV R4,BCSRA 

MOV 0FSLSA.R5 

MOV R5.R0 

BIC 057777, RO 

BEQ 18$ 



j GET THE ASSOCIATED LINE NUMBER. 

I SELECT ASSOCIATED LINE IND.ADR.REG FIELD. 

iGET THE STATE OF THE ASSOCIATED DSR, RI BITS. 

{CHECK FOR BOTH DSR AND RI CLEAR. 

{GO REPORT DTR IS BAD IF BOTH ARE CLEAR. 



I * 



CLEAR THE DTR FOR THE SELECTED LINE AND WAIT FOR EITHER DSR OR RI TO CLEAR. 



166572 



170316 
170314 



MOV R3,QCSRA 

BIC 06IT9.SLNCTRA 

MOV 0150074 ,R1 

BIT 08IT15.R5 

BEQ 16$ 

MOV 0170074, RI 

16$! MOV FSLSA.R2 

MOV R4.QCSRA 

JSR PC.WAIBIC 

BCS 20$ 

MOV aFSLSA,RO 

BIC 057777, R5 

BIC R0,R5 

BNE 20$ 

18$: {REPORT DTR MODEM CONTROL 

MOV 07803., ERRNBR 

MOV OER7801,ERRBLK 

MOV 0EM78O2.R1 

ERROR 



{SELECT THE SELECTED LINE IND.ADR.RFG FIELD. 

{CLEAR THE SELECTED LINE DTR. 

{SPECIFY TO WAIT UP TO 60 MS FOR RI TO CLEAR. 

{CHECK PREVIOUS STATE OF DSR BIT. 

{GO USE RI If DSR BIT WAS NOT SET. 

{SPECIFY TO WAIT UP TO 60 MS FOR DSR CLEAR. 

iSPECIFY TO LOOK IN STAT REG FOR BIT TO CLR. 

{SELECT ASSOCIATED LINE IND.ADR.REG FIELD. 

{WAIT UP TO 60 MS FOR SIGNAL TO GO CLEAR. 

{SELECT NEXT LINE AND LOOP IF SIGNAL IS CLEAR 

{GET THE STATUS REGISTER CONTENTS. 

{TEST FOR SIGNAL ONCE SET, BUT NOW CLEAR. 
{GO LOOP IF SIGNAL HAS GONE FROM SET TO CLR. 
SIGNAL DEFECTIVE ON LINE NN. 
{SELECT THE ERROR NUMBER, 
{SELECT THE ERROR PRINT ROUTINE. 
{SELECT THE ERROR MESSAGE. 



TRAP 



C$ERROR 



{ EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



OOO10O 166444 

000020 
166466 
000340 



20$: 
60$: 



BIT 
BEQ 

INC 

CMP 
BLT 

CLR 
SETPRI 



ENDTST 



0BIT06, OPTION 
60$ 

R3 

R3.0NUMLNS 
14$ 

CTRLCF 
0PRI07 



{EXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

{SELECT THE NEXT LINE NUMBER. 

{TEST FOR ALL LINES DONE. 

{LOOP IF NOT ALL LINES DONE. 

{INDICATE THAT WE ARE NOT WITHIN A TEST. 

{DISABLE ALL INTERRUPTS. 

MOV OPRI07.R0 
TRAP C$SPRI 



L 10020: 



TRAP 



C$LTST 



G8 



CZDHWBO DHU-11 FUNC TST PART3 MACRO M1200 15-MAR-84 09-41 PAGE 76 
HARDWARE TEST - RTSMCS - 



SEQ 97 



3795 
3796 
3797 
3798 
3799 
3800 
3801 
3802 
3803 
3804 
3805 
3806 

3807 
3808 
3809 
3810 
3811 
3012 
3813 



3814 
3815 
3816 
3817 
3818 
3819 
3820 
3821 
3822 
3823 
3824 
3825 
3826 
3827 
3828 
3829 
3830 
3831 
3832 
3833 
3834 
3835 
3836 
3837 
3838 
3839 
3840 
3841 
3842 
3843 
3844 
3845 
3846 
384 7 
3848 



013544 
013544 



013544 
013552 
013554 
013560 
013560 
013564 

013566 
013574 
013602 
013610 
013616 



013624 
013630 
013632 



013642 
013644 
013646 
013650 
013656 



013660 
013662 
013666 



032767 
001002 
000167 

012700 
104441 
000003 
012767 
012767 
012767 
012767 
012767 



004767 
103402 
000167 



005003 
010300 
006300 
036067 
001471 



005000 
012/05 
004 767 



000002 
000504 
000240 



000003 
177777 
000001 
017335 
005035 



166422 



166432 
166420 
170200 
170174 
170170 



174176 
000426 



013636 004767 173600 



002310 166314 



.SBTTL HARDWARE TEST - RTSMCS - 



- REQUEST TO SEND MODEM CONTROL SIGNAL TEST - 

THIS TEST VERIFIES THAT THE RTS MODEM CONTROL SIGNAL IS WORKING 
CORRECTLY, IT WILL ONLY BE PERFORMED IF EITHER 25 PIN OR STAGGERED 
LOOPBACK IS SPECIFIED. THIS TEST USES THE LOOPED BACK SIGNALS CTS 
AND DCD TO TEST THE RTS SIGNAL. THIS TEST IS PERFORMED ON ALL 
ACTIVE LINES, 



J* 
}* 

{ + 
5* 
J* 

;* 
;* 

BGNTST 

T3:: 
i * 
I ONLY PERFORM THIS TEST IF THE OUT IS IN EXTERNAL OR STAGGARED LOOPBACK MODE. 

« - 

I CHECK TYPE OF LOOPBACK MODE SELECTED. 

I EXIT THIS TEST IF IN INTERNAL LOOPBACK. 
1$: SETPRI 0PRIO5 jALLOW LTC INTERRUPTS. 

MOV OPRIOS.RO 
TRAP CJSPRI 
{INCREMENT THE ASSEMBLY TIME TEST COUNTER, 
j SET UP THE TEST NUMBER. C79) 
I INDICATE THAT WE ARE IN A TEST. 
;SET ERROR TYPE IN ERROR TABLE. 
{SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
j SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

i * 

{ RESET THE OUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO. 

j CLEAR TX AND RX INTERRUPT ENABLE BITS. 

{ THIS SUBROUTINE REPORTS ERROR > > > > > 7901 <<<<<. 

JSR PC.CLNRST jRESET THE OUT. 

BCS 3$ 

JMP 60$ j ABORT THE TEST IF FATAL ERROR FOUND IN RESET. 

J ♦ 

; SET UP THE TX/RX ASSOCIATED LINE NUMBER TABLE, 



BIT 


0BIT1.L0PBCK 


BNE 


1$ 


JMP 


60$ 


SETPRI 


0PRIO5 


TNUM - 


« TNUM ♦ 1 


MOV 


OTNUM.TSTNUM 


MOV 


•-1.CTRLCF 


MOV 


Ol.ERRTYP 


MOV 


07901., ERRNBR 


MOV 


OEM7901.ERRMSG 



;SET UP THE ASSOCIATED LINE TABLES. 



3$: JSR PC.ASLNTL 

j *■ 

t SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

i THIS LOOP CLEARS ALL THE RTSS AND THEN SETS THEM INDIVIDUALLY AND WAITS FOR 

; A RESPONSE ON THE ASSOCIATED CTS AND DCD SIGNALS. 

} THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET. 



2$: 



CLR 

MOV 
ASL 
BIT 
BEQ 



R3 

R3.R0 

RO 

BITTBL(RO),ACTLNS 



{CLEAR THE LINE COUNTER. 



8$ 



>DCN'T TEST IF NOT ACTIVE LINE. 



i CLEAR ALL THE DUT LNCTRL REGISTERS RTS BITS. 



177777 
175536 



CLR RO 
MOV 0MAPLNS.R5 
JSR PC.WTWLNC 



I SPEC IF Tf THAT ALL LNCTRL BITS TO Bh CLEARED. 
iSPECin THAT ALL LNCTRLS ARE TO BE CHANGED. 
jCLEAR ALL THE DUT RTS BITS. 



H8 



Si(R»W 


FUNC TST 


PARTS MACRO I 
- RTSMCS - 


3649 013672 


012704 


000074 


3850 013676 


004767 


174240 


3851 






3852 






3853 






3854 013702 


116304 


003750 


3655 013706 


010477 


166266 


3856 013712 


017705 


166270 


3857 013716 


012700 


014000 


3858 013722 


040500 




3859 013724 


001431 




3860 






3861 






3862 






3863 013726 


010377 


166246 


3864 013732 


052777 


010000 166250 


3865 013740 


012701 


130074 


3866 013744 


032705 


010000 


3867 013750 


001002 




3868 013752 


012701 


140074 


3869 013756 


016702 


166224 


3870 013762 


010477 


166212 


3871 013766 


004767 


175362 


3872 013772 


103423 




3873 013774 


017700 


166206 


3874 014000 


042700 


.163777 


3875 014004 


040500 




3876 014006 


001015 




3877 014010 






3878 014010 


012767 


017336 167774 


3879 014016 


012767 


006662 167772 


3880 014024 


012701 


005077 


3881 014030 






014030 


104460 




3602 






3883 






3884 






3885 014032 


032767 


000100 166122 


3886 014040 


001511 




3887 






3888 014042 


005203 




3889 014044 


020327 


000020 


3890 014050 


002675 




3891 






3892 






3893 






3394 






3895 






3896 






3897 014052 


005003 




3898 014054 


010300 




3899 014056 


006300 




3900 014060 


036067 


002310 166104 


3901 014066 


0014 72 




3902 






3903 






3904 







M1200 15-MAR-84 09j41 PAGE 76-1 



SEQ 98 



MOV 
JSR 



060. ,R4 
PC, DELAY 



{DELAY FOR 60 MS TO ALLOW SIGNALS TO SETTLE. 



i * 

} CHECK THAT AT LEAST ONE OF ASSOCIATED OCD OR CTS IS CLEAR AND RECORD STATES. 

MOVB TXRLNBCR3).R4 »GET THE ASSOCIATED LINE NUMBER. 

MOV R4.QCSRA {SELECT ASSOCIATED LINE IND.ADR.REG FIELD. 

MOV QFSLSA.R5 {GET THE STATE OF THE ASSOCIATED DCD , CTS BITS. 

MOV 0BIT12JBIT11.ro 

BIC R5,R0 {CHECK FOR BOTH DCD AND CTS SET. 

BEQ 6$ ,G0 REPORT RTS IS BAD IF BOTH ARE SET. 
} *■ 

; SET THE RTS FOR THE SELECTED LINE AND WAIT FOR EITHER DCD OR CTS TO SET. 

{SELECT THE SELECTED LINE IND.ADR.REG FIELD. 

{SET THE SELECTED LINE RTS. 

{SPECIFY TO WAIT UP TO 60 MS FOR CTS TO SET. 

{CHECK PREVIOUS STATE OF DCD BIT. 

{GO USE CTS IF DCD BIT WAS NOT CLEAR. 

{SPECIFY TO WAIT UP TO 60 MS FOR DCD SET. 

{SPECIFY TO LOOK IN STAT REG FOR BIT TO SET. 

{SELECT ASSOCIATED LINE IND.ADR.REG FIELD. 

;WAIT UP TO 60 MS FOR SIGNAL TO GO SET. 

{SELECT NEXT LINE ANO LOOP IF SIGNAL IS SET. 

{GET THE STATUS REGISTER CONTENTS. 

{REMOVE ALL BUT THE DCD ANO CTS BITS. 

{TEST FOR SIGNAL ONCE CLEAR, BUT NOW SET. 

{GO LOOP IF SIGNAL HAS GONE FROM CLR TO SET. 

SIGNAL DEFECTIVE ON LINE NN, 

{SELECT THE ERROR NUMBER. 

{SELECT THE ERROR PRINT ROUTINE. 

{SELECT THE ERROR MESSAGE. 

5 > v>>> ERROR <<<<< . 

TRAP 



4$; 



6$: 



{ - 



8$: 



MOV 


R3,aCSRA 


BIS 


06IT12,aLNCTRA 


MOV 


0130074, Rl 


BIT 


0BIT12.R5 


BNE 


4$ 


MOV 


4/140074, Rl 


MOV 


FSLSA.R2 


MOV 


R4,SCSRA 


JSR 


PC.WAIBIS 


BCS 


8$ 


MOV 


SFSLSA,RO 


BIC 


0163777, RO 


BIC 


R5,R0 


BNE 


8$ 


{REPORT 


RTS MODEM CONTROL 


MOV 


07902., ERRNBR 


MOV 


OER7801,ERRBLK 


MOV 


0EM7902,R1 


ERROR 




EXIT THE 


TEST IF EXTENDED 


BIT 


08IT06, OPTION 


BEQ 


60$ 


INC 


R3 


CMP 


R3,0NUMLNS 


BLT 


2$ 



C*ERROR 



ERROR REPORTING HAS NOT BEEN ENABLED 



{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS, 

iSELECT THE NEXT LINE NUMBER. 

:TEST FOR ALL LINES DONE. 

{LOOP IF NOT ALL LINES DONE. 



j SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION, 

I THIS LOOP SETS ALL THE RTSS ANO THEN CLEARS THEM INDIVIDUALLY 

; A RESPONSE ON THE ASSOCIATED CTS AND DCD SIGNALS. 

j THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET 



AND WAITS FOR 



10$: 



CLR 


R3 } 


MOV 


R3,R0 


ASL 


RO 


BIT 


BITTBLCRO) ( ACTLNS 


BEQ 


16* j 



{CLEAR THE LINE COUNTER. 



{DON'T TEST IF NOT ACTIVE LINE. 



SET ALL THE DUT LNCTRL REGISTERS RTS BITS, 



18 
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HARDWARE. TEST - RTSMCS - 



SEQ 99 



3905 


014070 


012700 


010000 


3906 


014074 


012705 


1777/7 


3907 


014100 


004767 


175324 


3908 


014104 


012704 


000074 


3909 


014110 


004767 


174026 


3^10 








3911 








3912 








3913 


014114 


116304 


003750 


3914 


014120 


010477 


166054 


3915 


014124 


017705 


166056 


3916 


014130 


010500 




3917 


014132 


042700 


163777 


3918 


014136 


001431 




3919 








3920 








3921 








3922 


014140 


010377 


166034 


3923 


014144 


042777 


010000 166036 


3924 


014152 


012701 


130074 


3925 


014156 


032705 


010000 


3926 


014162 


001402 




3927 


014164 


012701 


140074 


3928 


014170 


016702 


166012 


3929 


014174 


010477 


166000 


3930 


014200 


004767 


175074 


3931 


014204 


103423 




3932 


014206 


017700 


165774 


3933 


0)4212 


042705 


163777 


3934 


0142!* 


040005 




3935 


014220 


001015 




3936 


014222 






3937 


014222 


012767 


01/337 167562 


3938 


014230 


012767 


006662 167560 


3939 


014236 


012701 


005077 


3940 


014242 








014242 


104460 




3941 








3942 








394 3 








3944 


014244 


032767 


000100 165710 


394S 


014252 


001404 




3946 








394 7 


014254 


005203 




3948 


014256 


020327 


000020 


3949 


014262 


0026 /4 




3950 


014264 


00506 7 


1657 32 


3951 


014270 








014270 


012700 


000340 




014274 


104441 




3952 


0142/6 
014276 
014276 


104401 







MOV 


O8IT12.R0 




MOV 


0MAPLNS.R5 




JSR 


PC.WTWLNC 




MOV 


060. ,R4 




JSR 


PC, DELAY 


; CHECK 


THAT AT 


LEAST ONE OF ASS 




MOVB 


TXRLNB(R3),R4 




MOV 


R4.QCSRA 




MOV 


9FSLSA.R5 




MOV 


R5,R0 




BIC 


0163777, RO 




BEQ 


14$ 


1 CLEAR 


THE RTS 


FOR THE SELECTED 


' 


MOV 


R3.3CSRA 




BIC 


06lT12,aLNCTRA 




MOV 


0130074, Rl 




BIT 


06IT12.R5 




BEQ 


12$ 




MOV 


0140074, Rl 


12$: 


MOV 


FSLSA.R2 




MOV 


R4.8CSRA 




JSR 


PC.WAIBIC 




BCS 


16$ 




MOV 


SFSLSA.RO 




BIC 


0163777, R5 




BIC 


R0.R5 




BNE 


16$ 


14$: 


{REPORT 


RTS MOOEM CONTROL 




MOV 


07903. .ERRNBR 




MOV 


OER7801,ERRBLK 




MOV 


0EM7902.R1 




ERROR 




! EXIT THE 


TEST U EXTENDED 


• 


BIT 


OBIT06, OPTION 




BEQ 


60$ 


16$: 


INC 


R3 




CMP 


R3.0NUMLNS 




Bt I 


10$ 


60$: 


CLR 


C TRLO" 




SETPRI 


0PRIO7 



{SPECIFY THAT RTS BITS ARE TO BE SET, 

I SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED. 

{SET ALL THE OUT RTS BITS. 

I DELAY FOR 60 MS TO ALLOW SIGNALS TO SETTLE. 



{GET THE ASSOCIATED LINE NUMBER, 

{SELECT ASSOCIATED LINE IND.ADR.REG FIELD. 

{GET THE STATE OF THE ASSOCIATED DCD, CTS BITS. 

{CHECK FOR BOTH DCD AND CTS CLEAR. 

{GO REPORT RTS IS BAD IF BOTH ARE CLEAR. 



{SELECT THE SELECTED LINE IND.ADR.REG FIELD. 
{CLEAR THE SELECTED LINE RTS. 

{SPECIFY TO WAIT UP TO 60 MS FOR CTS TO CLEAR. 
{CHECK PREVIOUS STATE OF DCD BIT. 
{GO USE CTS IF DCD BIT WAS NOT SET. 
{SPECIFY TO WAIT UP TO 60 MS FOR DCD CLEAR. 
{SPECIFY TO LOOK IN STAT REG FOR BIT TO CLR. 
{SELECT ASSOCIATED LINE INO.ADR.REG FIELD. 
{WAIT UP TO 60 MS FOR SIGNAL TO GO CLEAR. 
{SELECT NEXT LINE ANO LOOP IF SIGNAL IS CLEAR. 
{GET THE STATUS REGISTER CONTENTS. 

{TEST FOR SIGNAL ONCE SET, BUT NOW CLEAR. 
{GO LOOP IF SIGNAL HAS GONE FROM SET TO CLR. 

SIGNAL DEFECTIVE ON LINE NN . 
{SELECT THE ERROR NUMBER. 
{SELECT THE ERROR PRINT ROUT INF. 
{SELECT THE ERROR MESSAGE. 
«, >> > >> ERROR <<<<< . 

TRAP C$ERROR 

ERROR REPORTING HAS NOT BEEN ENABLED 

{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

{SELECT THE NEXT LINE NUMBER . 

{TEST FOR ALL LINES DONE. 

{LOOP IF NOT ALL LINES DONE. 

i INDICATE THAT WE AR?. NOT WITHIN A TEST. 

{DISABLE ALL INTERRUPTS. 



ENDTST 



L 10021 



MOV 
TRAP 



TRAP 



0PRI0 7 

C$SPRI 



CSETST 



RO 



J8 
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HARDWARt TEST - DSRMS 



SEQ 100 



3954 
3953 
3Q56 
3957 
3958 
3959 
3960 
3961 
3962 
396? 
3964 
3965 
3966 

396 7 
3968 
3969 
3970 
3971 
3972 
3973 



3974 
3975 
3976 
3977 
3978 
3979 
3980 
3981 
3982 
3983 
3984 
3985 
3986 
398 7 
3986 
3989 
3990 
3991 
3992 
3993 
3994 
3995 
3996 
399/ 
3998 
3999 
4000 
4001 
4002 
4003 
4004 
4005 
4006 
4007 



014300 
014300 



014300 
014306 
014310 
014314 
014314 
014320 

014322 
014330 
014336 
014344 
014352 



014360 
014364 
014366 



014376 
014400 
014402 
014404 
014412 



014414 
014416 



032767 
001002 
000167 

012700 
104441 
000004 
012767 
012767 
012767 
012767 
012767 



000002 
000420 
000240 



000004 
177777 
000001 
017501 
005117 



004767 173442 

103402 

000167 000342 



014372 004767 173044 



005003 

010300 

006300 

036067 002310 

001454 



165666 



165676 
165664 
16/444 
167440 
167434 



165560 



.SBTTL HARDWARE TEST - DSRMS - 

- DATA SET READY MODEM SIGNAL TEST - 

THIS TEST VERIFIES THAT THE DSR MODEM STATUS SIGNAL IS WORKING 
CORRECTLY, IT WILL ONLY BE PERFORMED IF EITHER 25 PIN OR STAGGERED 
LOOPBACK IS SPECIFIED. THIS TEST USES THE LOOPED BACK DTR SIGNALS 
TO TEST THE DSR SIGNAL. THIS TEST IS PERFORMED ON ALL THE ACTIVE 

;* LINES. 

• 

BGNTST 

T4: ; 

l ONLY PERFORM THIS TEST IF THE OUT IS IN EXTERNAL OR STAGGARED LOOPBACK MODE. 

I CHECK TYPE OF LOOPBACK MODE SELECTED. 

f EXIT THIS TEST IF IN INTERNAL LOOPBACK. 
2$: SETPRI 0PRI05 j ALLOW LTC INTERRUPTS. 

MOV 0PRIO5,RO 
TRAP C5SPRI 
j INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
;SET UP THE TEST NUMBER. (80) 
INDICATE THAT WE ARE IN A TEST, 
j SET ERROR TYPE IN ERROR TABLE, 
j SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

RESET THE OUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS. 
THIS SUBROUTINE REPORTS ERROR >>>>> 8001 <<<<<, 



BIT 


OBIT1.L0PBCK 


BNE 


21 


JMP 


60$ 


SETPRI 


0PRI05 


TNUM - 


- TNUM «■ 1 


MOV 


OTNUM.TSTNUM 


MOV 


♦-1.CTRLCF 


MOV 


Ol.ERRTYP 


MOV 


08001. »ERRNBR 


MOV 


0EM8001.ERRMSG 



JSR 
BCS 
JMP 



PC, CLNRS1 

4i 

60$ 



{RESET THE DUT . 

jABOPT THE TEST IF FATAL ERROR FOUND IN RESET. 
SET UP THE TX/RX ASSOCIATED LINE NUMBER TABLE. 
4* j JSR 



PC.ASLNTL 



{SET UP THE ASSOCIATED LINE TABLES. 



j SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

{ THIS LOOP CLEARS ALL THE DTRS AND THEN SETS THEM INDIVIDUALLY AND WAITS FOR 

j A RESPONSE ON THE ASSOCIATED DSR SIGNAL. 

j THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET. 



6$; 



CLR 
MOV 
ASL 
BIT 
BFQ 



R3 

R3>R0 

RO 

BITTBLCRO),ACTLNS 



{CLEAR THE LINE COUNTER. 



10$ {DON'T TEST IF NOT ACTIVE LINE. 

i ♦ 
j CLEAR ALL THE DUT LNCTRL REGISTERS DTR BITS. 



005000 
012705 



177777 



CLR RO 

MOV 0MAPLNS.R5 



{SPECIFY THAT ALL LNCTRL BITS TO BE CLEARED. 
{SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED, 
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4008 
4009 
4010 
4011 
4012 
4013 
4014 
4015 
4016 
401? 
4018 
4019 
4020 
4021 
4022 
4023 
4024 
4025 
4026 
4027 
4028 
4029 
4030 
4031 
4032 
4033 
4034 
4035 
4036 
4037 
4038 
4039 

4040 
4041 
4042 
4043 
4044 
4045 
4046 
404 7 
4048 
4049 
4050 
4051 
4052 
4053 
4054 
4055 
4056 
4057 
4058 
4059 
4060 
4061 
4062 
4063 



014422 
014426 
014432 



014436 
014442 
014450 



014452 
014456 
014462 



014470 
014474 
014500 
014504 
014510 



014512 
014512 
014520 
014526 
014532 
014532 



014534 
014542 



014544 
014546 
014552 



014554 
014556 
014560 
014562 
014570 



004 76 7 
012704 
004 767 



010377 
032777 
001020 



116304 
010477 
052777 



010377 
012701 
016702 
004767 
103415 



012767 
012767 
012701 

104460 



032767 
001474 



005203 
020327 
002712 



005003 
010300 
006300 
036067 
001455 



- DSRMS 

175002 
000050 
173504 



165536 
100000 



l<8 
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SEQ 101 



003750 
165516 
001000 



165504 
170050 
165502 
174644 



017502 
006662 
005163 



j CLEAR ALL THE OUT DTR BITS. 

j DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 
CHECK THAT THE SPECIFIED DSR IS CLEAR. 



JSR 

MOV 
JSR 



PC.WTWLNC 
*40. ,R4 
PC, DELAY 



J - 



165536 



MOV R3.SCSRA 

bit *eiTi5.arsLSA 

BNE 8$ 



iSET IND.ADR.REG FIELD TO SELECTED LINE. 
} G0 REPORT DSR IS BAD IF BIT IS NOT CLEAR. 



SET THE DTR FOR THE ASSOCIATED LINE. 

NOTE: IF THE ASSOCIATED LINE IS NOT SELECTED, DTR WILL NOT HAVE BEEN TESTED 
IN THE DTR TEST (ONLY AN ISSUE IN STAGGERED LOOPBACK). 



165520 



MOVB TXRLNB(R3),R4 

MOV R4,SCSRA 

BIS *6IT9,QLNCTRA 



tGET THE ASSOCIATED LINE NUMBER. 

{SET IND.ADR.REG FIELD TO ASSOCIATED LINE. 

j SET THE ASSOCIATED LINE DTR. 



; CHECK THAT THE SELECTED LINE DSR IS ACTIVE. 



MOV R3.SCSRA 

MOV 0170050, Rl 

MOV FSLSA,R2 

JSR PCWAIBIS 

BCS 10$ 



{SET IND.ADR.REG FIELD TO SELECTED LINE. 

iPASS TIMEOUT OF 40 MILLI-SEC. AND BIT TO TEST. 

j PASS THE ADDRESS OF THE REGISTER TO TEST. 

j WAIT FOR DSR TO BECOME SET OR TIMEOUT. 

{SKIP ERROR REPORT IF SELECTED DSR IS SET. 



167272 
167270 



8$: {REPORT DSR MODEM CONTROL SIGNAL DEFECTIVE ON LINE NN. 



MOV 

MOV 

MOV 

ERROR 



08002. .ERRNBR 

OER7801.ERRBLK 

0EM8002.R1 



{SELECT THE ERROR NUMBER. 
{SELECT THE ERROR PRINT ROUTINE. 
{SELECT THE ERROR MESSAGE. 



TRAP 



C$ERROR 



{ ♦ 

j EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 165420 



000020 



10$: 



; 



BIT 0BIT06, OPTION 
BEQ 60$ 



INC R3 
CMP R3.0NUMLNS 
BLT 6$ 



{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

{SELECT THE NEXT LINE NUMBER. 
{TEST FOR ALL LINES DONE, 
{LOOP IF NOT ALL LINES DONE. 



{ SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

{ THIS LOOP SETS ALL THE DTRS AND THEN CLEARS THEM INDIVIDUALLY AND WAITS FOR 

j A RESPONSE ON THE SELECTED DSR SIGNAL. 

t THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET. 



002310 165402 



12$: 



{ * 



CLR 

MOV 
ASL 
BIT 
BEQ 



R3 

R3.R0 

RO 

BITTBL(RO),ACTLNS 



{CLEAR THE LINE COUNTER. 



16$ 



5 DON'T TEST IF NOT ACTIVE LINE. 



j SET ALL THE DUT LNCTRL REGISTERS DTR BITS. 
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SEQ 102 



4064 
4065 
4066 
4067 
4068 
4069 
4070 
4071 
4072 
4073 
4074 
4075 
4076 
4077 
4078 
4079 
4080 
4081 
4082 
4083 
4084 
4085 
4086 
4087 
4088 
4089 
4090 
4091 
4092 
4093 
4094 
4095 
4096 
4097 

4098 

4099 
4100 
4101 
4102 
4103 
4104 
4105 
4106 
4107 
4108 
4109 
4110 
4111 



4112 
4113 



014572 
014576 
014602 
014606 
014612 



014616 
014622 
014630 



014632 
014636 
014642 



014650 
014654 
014660 
014664 
014670 

014672 
014672 
014700 
014706 
014712 
014712 



014 714 
014722 



014724 
014726 
014732 

014 734 

014740 
014740 
014744 

014746 
014746 
014746 



012700 
012705 
004 767 
012704 
004 767 



010377 
032777 
001420 



116304 
010477 
042777 



010377 
012701 
016702 
004767 
103415 



012767 
012767 
012701 

104460 



032767 
001404 



005203 
020327 
002711 

005067 

012700 
104441 



104401 



001000 
177777 
174622 
000050 
173324 



165356 

100000 165356 



165262 
000340 



MOV 0BIT9.R0 

MOV 0MAPLNS,R5 

JSR PC.WTWi.NC 

MOV 040., R4 

JSR PC, DELAY 



{SPECIFY THAT DTR BITS ARE TO BE SET. 

, SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED. 

{SET ALL THE DUT DTR BITS. 

{DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 



i ♦ 



CHECK THAT THE SPECIFIED DSR IS SET. 



} - 



MOV R3,SCSRA 
BIT 0BIT15.QFSLSA 
BEQ 14$ 



I SET IND.ADR.REG FIELD TO SELECTED LINE. 
{GO REPORT DSR IS BAD IF BIT IS NOT SET. 



003750 
165336 
001000 165340 



165324 
170050 
165322 
174410 



017503 167112 
006662 167110 
005163 



CLEAR THE DTR FOR THE ASSOCIATED LINE. 

NOTE! IF THE ASSOCIATED LINE IS NOT SELECTED, DTR WILL NOT HAVE BEEN TESTED 
IN THE DTR TEST (ONLY AN ISSUE IN STAGGERED LOOPBACK). 



MOVB TXRLNB(R3),R4 

MOV R4.QCSRA 

BIC 0BIT9,QLNCTRA 



{GET THE ASSOCIATED LINE NUMBER. 

i SET IND.ADR.REG FIELD TO ASSOCIATED LINE 

j CLEAR THE ASSOCIATED LINE DTR. 



CHECK THAT THE SELECTED LINE DSR IS CLEAR. 



MOV R3,QCSRA 

MOV 0170050, Rl 

MOV FSLSA.R2 

JSR PC.WAIBIC 

BCS 16$ 



;SET IND.ADR.REG FIELD TO SELECTED LINE. 
{PASS TIMEOUT OF 40 MILLI-SEC, AND BIT TO TEST 
{PASS THE ADDRESS OF THE REGISTER TO TEST. 
{WAIT FOR DSR TO BECOME CLEAR OR TIMEOUT. 
{SKIP ERROR REPORT IF SELECTED DSR IS CLEAR, 



14$: {REPORT DSR MODEM CONTROL SIGNAL DEFECTIVE ON LINE NN. 



MOV 

MOV 

MOV 

ERROR 



08003. ,ERRNBR 

0ER7801.ERRBLK 

0EM8002.R1 



{SELECT THE ERROR NUMBER. 
{SELECT THE ERROR PRINT ROUTINE. 
{SELECT THE ERROR MESSAGE. 



TRAP 



C$ ERROR 



000100 165240 



000020 



i EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

I - 

{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 



BIT 
BEQ 



OBIT06, OPTION 
60$ 



16$ 



60$ 



INC 
CMP 
BLT 

CLR 
SETPRI 



ENDTST 



R3 

R3.0NUMLNS 
12$ 

CTRLCF 
0PRI07 



{SELECT THE NEXT LINE NUMBER. 
{TEST FOR ALL LINES DONE. 
{LOOP IF NOT ALL LINES DONE. 

{INDICATE THAT WE ARE NOT WITHIN A TEST. 

{DISABLE ALL INTERRUPTS. 

MOV OPRI07.R0 
TRAP CSSPRI 



L10022: 



TRAP 



C$ETST 



M8 
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4115 
4116 
4117 

4118 
4119 
4120 
4121 
4122 
4123 
4124 
4125 
4126 
4127 

4128 
4129 
4130 
4131 
4132 
4133 
4134 



4135 
4136 
4137 
4138 
4139 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4148 
4149 
4150 
4151 
4152 
4153 
4154 
4155 
4156 
415/ 
4158 
4159 
4160 
4161 
4162 
4163 
4164 
4165 
4 166 
416/ 
4168 



014750 
014750 



014750 
014756 
014760 
014764 
014764 
014770 

014772 
015000 
015006 
015014 
015022 



015030 
015034 
015036 



015046 
015050 
015052 
015054 
015062 



015064 
015066 



032767 
001002 
000167 

012700 
104441 
000005 
012767 
012767 
012767 
012767 
012767 



004767 
103402 
000167 



005003 
010300 
006300 
036067 
001454 



005000 
012 705 



000002 
000420 
000240 



000005 
177777 
000001 
017645 
005227 



165216 



165226 
165214 
166/74 
166/70 
166764 



172772 
000342 



015042 004767 172374 



002310 165110 



SBTTL HARDWARE TEST - RINGI - 

* * ******************* ********************************************************* 



- RING INDICATOR MODEM SIGNAL TEST - 

THIS TEST VERIFIES THAT THE RI MODEM STATUS SIGNAL IS WORKING 
CORRECTLY. IT WILL ONLY BE PERFORMED IF EITHER 25 PIN OR STAGGERED 
LOOPBACK IS SPECIFIED, THIS TEST USES THE LOOPED BACK DTR SIGNALS 
TO TEST THE RI SIGNAL. THIS TEST IS PERFORMED ON A'.L THE ACTIVE 
LINES. 



T5:: 



+ 

* 

* 
* 
* 
* 
* 
--+*+++**++++**+ ^ *+++**++***+***+**********************************+***+***++* 

BGNTST 



ONLY PERFORM THIS TEST IF THE OUT IS IN EXTERNAL OR STAGGARED LOOPBACK MODE. 

j CHECK TYPE OF LOOPBACK MODE SELECTED. 

{EXIT THIS TEST IF IN INTERNAL LOOPBACK. 
2$: SETPRI APRI05 i ALLOW LTC INTERRUPTS. 

MOV OPRI05,RO 
TRAP C$SPRI 
{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
{SET UP THE TEST NUMBER. (81) 
{INDICATE THAT WE ARE IN A TEST. 
{SET ERROR TYPE IN ERROR TABLE. 
{SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
{SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
i * 

j RESET THE OUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS. 
{ THIS SUBROUTINE SPORTS ERROR >>>>> 8101 <<<<<. 
i - 

JSR PC.CLNRbi {RESET THE DUT . 
BCS 4$ 

JMP 60$ {ABORT THE TEST IF FATAL ERROR FOUND IN RESET. 

; ♦ 
i SET UP THE TX/RX ASSOCIATED LINE NUMBER TABLE. 



BIT 


OBITl.LOPBCK 


BNE 


2* 


JMP 


60$ 


SETPRI 


VJPRI05 


TNUM * 


- TNUM ♦ 1 


MOV 


OTNUM.TSTNUM 


MOV 


O-l.CTRLCF 


MOV 


Ol.ERRTYP 


MOV 


tfeiOl. ,ERRNBR 


MOV 


$EM8101,ERRMSG 



JSR 



PC.ASLNTL 



;5u 



IT UP THE ASSOCIATED LINE TABLES. 



177 7 77 



4$: 

t * 

I SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

j THIS LOOP CLEARS ALL THE DTRS AND THEN SETS THEM INDIVIDUALLY AND WAITS FOR 

{ A RESPONSE ON THE ASSOCIATED RI SIGNAL. 

{ THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS If THEY ARE SET, 

CLR R3 {CLEAR THE LINE COUNTER. 

6$: MOV R3.R0 

ASL RO 

BIT BITTBL(RO),ACTLNS 

BEQ 10$ {DON'T TtST IH NOT ACTIVE LINE. 

t * 

{ CLEAR ALL THE DUT LNCTRL REGISTERS DTR BITS. 
J - 

CLR RO {SPECIFY THAT ALL LNCTRL. BITS TO BE CLEARED. 

MOV 0MAPLNS.R5 {SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED. 



N8 
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SEQ 104 



4169 
4170 
4171 
4172 
4173 
4174 
4175 
4176 
4177 
4178 
4179 
4180 
4181 
418? 
4183 
4184 
4185 
4186 
4187 
4188 
4189 
4190 
4191 
4192 
4193 
4194 
4195 
4196 
4197 
4198 
4199 
4200 

4^01 

420^ 
420T 
4.^04 
4 205 
420o 
4207 
4208 
4209 
4210 
4211 
4212 
4213 
4214 
4215 
4216 
4217 
4210 
4219 
4220 
4221 
4222 
4223 
4224 



015072 
015076 
015102 



015106 
015112 
015120 



015122 
015126 
015132 



015140 
015144 
015150 
015154 
015160 



015162 
015162 
015170 
015176 
015202 
015202 



015204 
015212 



015214 
C15216 
015222 



015224 
015226 

015230 
015232 
015240 



004767 
012704 
004767 



010377 
032777 
001020 



116304 
010477 
052777 



010377 
012701 
016702 
004767 
103415 



012767 
012767 
012701 

104460 



032767 
001474 



005203 
020327 
002712 



005003 
010300 
006300 
056067 
001455 



174332 
000050 
173034 



165066 
020000 



003750 
165046 
001000 



165034 
150050 
165032 
174174 



017646 
006662 
005272 



165066 



165050 



166622 
166620 



000100 164750 



000020 



002310 164732 



JSR 

MOV 
JSR 



PC.WTWLNC 
040. ,R4 
PC, DELAY 



{CLEAR ALL THE OUT DTR BITS. 

{DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 

+ 

CHECK THAT THE SPECIFIED RI IS CLEAR. 



MOV R3.5CSRA 
BIT 0BV'i3,SFSLSA 
BNE 8* 



{SET IND.ADR.REG FIELD TO SELECTED LINE. 
{GO REPORT RI IS BAD IF BIT IS NOT CLEAR. 



J * 



; SET THE DTR FOR THE ASSOCIATED LINE. 

5 NOTE: IF THE ASSOCIATED LINE IS NOT SELECTED, OTR WILL NOT HAVE BEEN TESTED 

j IN THE DTR TEST (ONLY AN ISSUE IN STAGGERED LOOPBACIO . 



MOVB TXRLNB(R3),R4 

MOV R4,QCSRA 

BIS 0BIT9,S)LNCTRA 



{GET THE ASSOCIATED LINE NUMBER. 

{SET IND.ADR.REG FIELD TO ASSOCIATED LINE. 

{SET THE ASSOCIATED LINE DTR. 



CHECK THAT THE SELECTED LINE RI IS ACTIVE. 



MOV R3.SCSRA 

MOV 0150050, RI 

MOV FSLSA.R2 

JSR PC.WAIBIS 

BCS 10$ 



{SET IND.ADR.REG FIELD TO SELECTED LINE. 
{PASS TIMEOUT OF 40 MILLI-SEC, AND BIT TO TEST. 
{PASS THE ADC-KCSS OF THE REGISTER TO TEST. 
{WAIT FOR RI TO BECOME SET OR TIMEOUT. 
{SKIP ERROR REPORT IF SELECTED RI IS SET. 



8$; {REPORT RI MODEM CONTROL SIGNAL DEFECTIVE ON LINE NN. 



MOV 

MOV 

MOV 

ERROR 



48102. .ERRNBR 

OER7801.FRRBLK 

0EM8102.R1 



{SELECT THE ERROR NUMBER. 
{SELECT THE ERROR PRINT ROUTINE. 
{SELECT THE ERROR MESSAGE, 



TRAP 



CSERRUR 



{ EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



10$: 



BIT 0BITO6, OPTION 
BEQ 60$ 



INC R3 
CMP R3.0NUMLNS 
BLT 6$ 



{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

{SELECT THE NEXT LINE NUMBER. 
{TEST FOR ALL LINES DONE. 
{LOOP IF NOT ALL LINES DONE. 



t *■ 
, 

i 

i 

{ 

; 



SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

THIS LOOP SETS ALL THE DTRS AND THEN CLEARS THEM INDIVIDUALLY AND WAITS FOR 

A RESPONSE ON THE SELECTED RI SIGNAL, 
THIS LOOP WILL CLEAR THE TX,IE AND RX.IE BITS IF THEY ARE SET, 



12$: 



CLR 
MOV 
ASL 
BIT 
BEQ 



R3 

R3,R0 

KO 

BI'iTBL(RO),ACTLNS 



{CLEAR THE LINE COUNTER. 



I 



16$ ;DON»T TEST IF NOT ACTIVE LINE. 

SET ALL THE OUT LNCTRL REGISTERS DTR BITS, 
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SEO 105 



4226 
4227 
4228 
4229 
4230 
4251 
4232 
4233 
4234 
4235 
4236 
4237 
4238 
4239 
4240 
4241 
4242 
424 3 
4244 
4245 
4246 
424 7 
4248 
4249 
4250 
4251 
4252 
4253 
4254 
4255 
4256 
4257 
4258 

4259 
4260 
4261 
4262 

4265 
4264 
4265 
4 266 
4267 
4268 
4269 
42/0 
42/1 
4272 



4273 
42 74 



015242 
015246 
015252 

015256 
015262 



015266 
015272 
015300 



015302 
015306 
015312 



015320 
015324 
015330 
015334 
015340 

015342 
015342 
015350 
015356 
015362 
015362 



0155^4 
015372 



015374 
015376 
015402 

015404 
015410 
015410 
015414 

015416 
015416 
0154X6 



012700 
012705 
004 767 
012704 
004767 



010377 
0327/7 
001420 



116304 
010477 
042777 



010377 
012701 
016702 
0O4 76 7 
105415 



012767 
012767 
012701 

104460 



032/6/ 
001404 



00520 3 
02032 7 
002711 

00506 7 

012/00 
104441 



1044Q1 



001000 
177777 
174152 
000050 
172654 



164 706 
020000 



003750 
164666 
001000 



164654 
150050 
164652 
173740 



01764/ 
006662 
005272 



164612 
000340 



164706 



164670 



166442 
166440 



000100 164570 



000020 



MOV 


08IT9.RO 


MOV 


0MAPLNS.R5 


J5R 


PC.WTWt.NC 


MOV 


#40. ,R4 


JSR 


PC, DELAY 



\ • 

■SPECIFY THAT DTR BITS ARE TO BE SET. 
iSPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED, 
iSET ALL THE DUT DTR BITS. 

iDELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 

j CHECK THAT THE SPECIFIED RI IS SET. 

I - 

MOV R3,tfCSRA jSET INO.ADR.REG FIELD TO SELECTED LINE. 

BIT *BIU3,QFSLSA 

BEQ 14$ |G0 REPORT RI IS BAD IF BIT 15 NOT SET. 

I CLEAR THE DTR FOR THE ASSOCIATED LINE. 

j NOTE} IF THE ASSOCIATED LINE IS NOT SELECTED. DTR WILL NOT HAVE BEEN TESTED 

I IN THE DTR TEST (ONLY AN ISSUE IN STAGGERED LOOPBACK). 

1 - 

MOVB TXRLNB(RS),R4 |GET THE ASSOCIATED LINE NUMBER. 

MOV R4.0CSRA ,SET INO.ADR.REG FIELD TO ASSOCIATED LINE. 

BIC ♦BIT9.BINCTRA , CLEAR THE ASSOCIATED LINE DTR. 

j CHECK THAT THE SELECTED LINE RI IS CLEAR. 

MOV R3.0CSRA , SE T INO.ADR.REG FIELD TO SELECTED LINE. 

MOV •150050.R1 iPASS TIMEOUT 0* 40 MILLI-SEC, AND BIT TO TEST. 

MOV FSLSA.R2 'PASS THE ADDRESS OF THE REGISTER TO TEST. 

JSR PC.WAIBIC iWAIT FOR RI TO BECOME CLEAR OR TIMEOUT. 

BCS 16$ iSKIP ERROR REPORT IF SELECTED RI IS CLEAR, 



14$ 



jREPORT RI MOOEM CONTROL SIGNAL DEFECTIVE ON LINE NN. 

MOV #8103. .ERRNBR iSELECT THE ERROR NUMBER. 

MOV *€R7801,ERRBLK iSELECT THE ERROR PRINT ROUTINE. 

MOV 0EM8102.R1 iSELECT THE ERROR MESSAGE. 

ERROR 



TRAP 



I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABl ED 



CIERROR 



16$ 



60$: 



BIT 
BEQ 



INC 
CMP 
BL t 

CI R 
StTPRI 



ENDTST 



OBir06 4 QPTI0N 
60$ 



R3 

R3.0NUMLNS 
12* 



CTRLCf 
OPRI07 



|EXIT WITH TEST FAILURE MESSAGE IF 

i NO EXTENOED ERROR REPORTING HAS BEEN REQUESTED 

iDURING THE SOFTWARE QUESTIONS* 

iSELECT THE NEXT LINE. NUMBER. 
lIEST FOR ALL LINES DONE. 
lLOOP IF NOT ALL LINES DONE. 

lINOICATE THAT WE ARE NOT WITHIN A TEST. 

tDISABLfc ALL INTERRUPT S, 

MOV 0PRI0.\R0 

TRAP C*SPRI 



L10Q25J 



TRAP 



CitTST 



fiSRBttWi'W 



C9 



I FUNC TST PA 



MSm- 
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SEU 106 



42/6 

427/ 
42/8 

42/9 

4280 

4281 
4282 
4283 
4284 

4285 

4286 
428? 
4288 

4289 
4290 
4291 
4292 
4293 
4294 
4295 



4296 
4297 
4298 
4290 
4 500 
4301 
4 302 
4303 
4 304 
4 305 
4306 
430/ 
4 308 
4309 
4310 
4311 
4312 
4313 
4314 
4315 
4316 
431/ 
4318 
4319 
4320 
4321 
4 322 
4323 
4324 
4325 
4 326 
4 32/ 
4328 
4329 



015420 
015420 



015420 
015426 
015430 
015434 
015454 
015440 

015442 
015450 
015456 
015464 
015472 



015500 
015504 
015506 



015516 
015520 
015522 
015524 
015532 



015534 



032767 

GO 1002 
000167 

012700 
104441 

000006 
012767 
012767 
012767 
012767 
012767 



004767 
103402 
000167 



005003 
010300 
006300 
036067 
001454 



005000 
012705 



000002 
000420 
000240 



000006 

177777 
000001 
020011 
005335 



164546 



164556 
164544 
166324 

166320 
166314 



172322 
000342 



015512 0^4767 171724 



002310 164440 



.SBTU HARDUARF. TEST - CTSMS - 

- CLEAR TO SEND MODEM SIGNAL TEST • 

THIS TEST VERIFIES THAT THE CTS MODEM STATUS SIGNAL IS WORKING 
CORRECTLY. IT WILL ONLY BE PERFORMED IF EITHER 25 PIN OR STAGGERED 
LOOPBACK IS SPECIFIED. THIS TEST USES THE LOOPED BACK RTS SIGNALS 
TO TEST THE CTS SIGNAL. THIS TEST IS PERFORMED ON ALL THE ACTIVE 
LINES. 

BGNTST 

T6: : 
J ♦ 

j ONLY PERFORM THIS TEST IF THE DUT IS IN EXTERNAL OR STAGGARED LOOPBACK MODE. 
I - 

I CHECK TYPE OF LOOPBACK MODE SELECTED. 

lEXIT THIS TEST IF IN INTERNAL LOOPBACK. 
2*j SETPRI 0PRI05 iALLOW LTC INTERRUPTS. 

MOV 0PRI05.R0 
TRAP C$'->PRI 

j INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

jSET UP THE TEST NUMBER. (82) 

iINOICATE THAT WE ARE IN A TEST. 

iSZT ERROR TYPE IN ERROR TABLE, 

I SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
* ♦ 

i RESET THE DUT TO A KNOWN STATE. REMOVE STATUS CODES FROM THE FIFO, 
j CLEAR TX AND RX INTERRUPT ENABLE BITS. 
I THIS SUBROUTINE REPORTS ERROR >>>>^ 8201 <<<<<. 
I - 



BIT 


06IU.LOPBCK 


BNE 


21 


JMP 


60$ 


SETPRI 


0PRI05 


TNUM - 


- TNUM ♦ 1 


MOV 


♦TNUM.TSTNUM 


MOV 


•-1.CTRLCF 


MOV 


Ol.ERRTYP 


MOV 


♦8201..ERRN6R 


MOV 


0EM8201.ERRMSG 



JSR 
BCS 

JMP 



PC.CLNRST 

41 

60$ 



l RESET THE DUT. 

, ABORT THE TEST IF FATAL ERROR FOUND IN RESET. 



iSET UP THE ASSOCIATED LINE TABLES, 



j SET UP THE TX/RX ASSOCIATED LINE NUMBER TABLE. 

41 1 JSR PC.ASLNTL 

i ♦ 

, SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

, THIS LOOP CLEARS ALL THE RTS'S ANO THEN SETS THEM INDIVIDUALLY AND WAITS FOR 

j A RESPONSE ON THE ASSOCIATED CIS SIGNAL. 

j THIS LOOP WILL CLEAR THE TX.IE ANO RX . IE BITS IF THEY ARE SET. 

; 



61: 



i 



CLR 
MOV 
ASL 
BIT 
OFQ 



R3 

R3.R0 

RO 

BITTBl (RO).ACTLNS 



I CLEAR THE LINE COUNTER, 



101 



iDON' T TEST IF NOT ACTIVE LINE. 



177777 



j CLFAR ALL THE DUT LNCTRL REGISTERS R1S BITS. 

{ - 

CLR RO iSPF.CIM THAT ALI LNCTRl BITS TOBt CUAKhD. 

MOV GMAPLNS»R5 | SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED. 
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SEQ 107 



4530 
4331 
433,? 

4333 
4334 
4335 

4336 
4337 

4338 
4339 
4340 
4341 
4342 
4343 
4344 
4345 
4346 
4347 
4348 
4349 
4350 
4351 
4352 
4353 
4354 
4355 
4356 
4357 
4358 
4359 
4360 
4361 

4362 
4363 
4364 
4365 
4366 
4367 
4368 
4369 
4370 
4371 
4372 
4373 
4374 
4375 
4376 
4377 
4378 
4379 
4380 
4381 
4382 
4383 
4384 
4 385 



015542 
015546 
015552 



015556 

015562 
015570 



015572 
015576 
015602 



015610 
015614 
015620 
015624 
015630 



015632 
015632 
015640 
015646 
015652 
015652 



015654 
015662 



015664 
015666 
015672 



015674 
015676 
015700 
015702 
015710 



004 767 
012704 
004767 



010377 
032777 
001020 



116304 
010477 
052777 



010377 
012701 
016702 
004767 
103415 



012767 
012767 
012701 

104460 



03276 7 
001474 



005203 
020327 
002712 



005003 
010300 
006300 
036067 
001455 



000050 
172364 



164416 
004000 



003750 
164376 
010000 



164364 
130050 
164362 
173524 



020012 
006662 
005401 



164416 



164400 



166152 

166150 



000100 164300 



000020 



002310 164262 



JSR 

MOV 
JSR 



PC.WTWLNC 
040, >R4 
PC, DEL AY 



I CLEAR ALL THE DUT RTS BITS. 

{DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 



I CHECK THAT THE SPECIFIED CTS IS CLEAR. 

t - 

MOV R3.BCSRA ,SF.T IND.ADR.REG FIELD TO SELECTED LINE. 

BIT *BITU.BF5LSA 

BNE 8$ jGO REPORT CTS IS BAD IF BIT IS NOT CLEAR. 

; SET THE RT5 FOR THE ASSOCIATED LINE. 

j NOTE: IF THE ASSOCIATED LINE IS NOT SELECTED, RTS WILL NOT HAVE BEEN TESTED 

j IN THE RTS TEST (ONLY AN ISSUE IN STAGGERED LOOPBACK). 

MOVB TXRLN8(R3),R4 ,GET THE ASSOCIATED LINE NUMBER. 

MOV R4.SCSRA ,SET INC. ADR. REG FIELD TO ASSOCIATED LINE. 

BIS 0BIT12,QLNCTRA {SET THE ASSOCIATED LINE RTS. 

i CHECK THAT THE SELECTED LINE CTS IS ACTIVE, 

MOV R3.8CSRA |SET INO.ADR.REG FIELD TO SELECTED LINE, 

MOV 0130050, Rl {PASS TIMEOUT Of 40 MILLI-SEC, AND BIT TO TEST. 

MOV FSLSA.R2 {PASS THE ADDRESS OF THE REGISTER TO TEST. 

JSR PC.WAIBIS {WAIT FOR CTS TO BECOME SET OR TIMEOUT. 

BCS 10* »SKIP ERROR REPORT IF SELECTED CTS IS SET. 

8*: iREPORT CTS MODEM CONTROL SIGNAL DEFECTIVE ON LINE NN. 



MOV 

MOV 

MOV 

ERROR 



08202. .ERRN6R 

OER780l,FRRBLK 

0EM8202.R1 



I SELECT THE ERROR NUMBER. 

j SELECT THE ERROR PRINT ROUTINE. 

I SELECT THE ERROR MESSAGE. 



TRAP 



CSERROR 



j * 



i EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



10$: 



BIT 06IT06»OPTION 

BEQ 60$ 



INC R3 

CMP R3.0NUMLNS 

BLT 6$ 



lEXVT WITH TEST FAILURE MESSAGE IF 

j NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTUARE QUESTIONS. 

jSELECT THE NEXT LINE NUMBER. 
{TFST FOR ALL LINES DONE. 
{LOOP IF NOT ALL LINES DONE. 



SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

THIS LOOP SETS ALL THE RTSS ANO TH^N CLEARS THEM INDIVIDUALLY AND WAITS FOR 

A RESPONSE ON THE SELECTED CTS SIGNAL. 
THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET. 



12$ 5 



CLR 

MOV 
ASL 
BIT 
BEQ 



R3 

R3.R0 

RO 

BITTBL(RO),ACTLNS 



{CLEAR THE LINE COUNTER. 



16$ 



{DON'T TEST IF NQT ACTIVE LINE. 



; SET ALL THE OUT LNCTRL REGISTERS RTS BITS. 



E9 



czoHueo 

HARDWARE 



°^5' 



1 FUNC TST 



4386 
4387 
4308 
4389 
4390 
4391 
4392 
4393 
4394 
4395 
4396 
4397 
4398 
4399 
4400 
4401 
4402 
4403 
4404 
4405 
44'.* 
4407 
4408 
4409 
4410 
4411 
4412 
4413 
4414 
4415 
4416 
4417 
4418 
4419 

4420 
4421 
4422 
4423 
4424 
4425 
4426 
4427 
4428 
4429 
4430 
4431 
4432 
4433 



44 34 
4435 



015712 
015716 
015722 
015726 
015732 



015736 
015742 
015750 



015752 
015756 
015762 



015770 
015774 
016000 
016004 
016010 

016012 
016012 
016020 
016026 
016032 
016032 



016034 
016042 



016044 
016046 
016052 

016054 
016060 
016060 
016064 

016066 
016066 
016066 



012700 
012705 
004 767 
012704 
004767 



010377 
032777 
001420 



116304 
010477 
042777 



010377 
012701 
016702 
004 767 
103415 



012767 
012767 
012701 

104460 



032767 
001404 



005203 
020327 
002711 

005067 

012700 
104441 



104401 



pm c h 



;ms 



010000 
177777 
173502 
000050 
172204 



164236 
004000 



003750 
164216 
010000 



164204 
130050 
164202 
173270 



020013 
006662 
005401 
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SEQ 108 



164142 
000340 



I - 



MOV 4BIT12.R0 

MOV 4MAPLNS,R5 

J5R PC.WTWuNC 

MOV 440..R4 

JSR PC, DELAY 



{SPECIFY THAT RTS BITS ARE TO BE SET. 

I SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED. 

iSET ALL THE OUT RTS BITS. 

I DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 



CHECK THAT THE SPECIFIED CTS IS SET. 



I - 



164236 



MOV R3.SCSRA 
BIT frBITll.QFSLSA 
BEQ 14* 



rSET IND.ADR.REG FIELD TO SELECTED LINE. 
jGO REPORT CTS IS BAD IF BIT IS NOT SET. 



164220 



I CLEAR THE RTS FOR THE ASSOCIATED LINE. 

I NOTE: IF THE ASSOCIATED LINE IS NOT SELECTED, RTS WILL NOT HAVE BEEN TESTED 

; IN THE RTS TEST (ONLY AN ISSUE IN STAGGERED LOOPBADO. 

J - 

MOVB TXRLNB(R3),R4 {GET THE ASSOCIATED LINE NUMBER. 

MOV R4.SCSRA {SET IND.ADR.REG FIELD TO ASSOCIATED LINE. 

BIC 0BIT12.0LNCTRA jCLEAR THE ASSOCIATED LINE RTS. 

, CHECK THAT THE SELECTED LINE CTS IS CLEAR. 

jSET If40.ADR.REG FIELD TO SELECTED LINE. 

{PASS TIMEOUT OF 40 MILLI-SEC, AND BIT TO TEST. 

{PASS THE ADDRESS OF THE REGISTER TO TEST. 

j WAIT FOR CTS TO BECOME CLEAR OR TIMEOUT. 

j SKIP ERROR REPORT IF SELECTED CTS IS CLEAR. 



MOV 


R3.QCSRA 


MOV 


0130050, Rl 


MOV 


FSLSA.R2 


JSR 


PC.WAIBIC 


BCS 


16$ 



165772 
165770 



14$ 



{REPORT CTS MOOEM CONTROL SIGNAL DEFECTIVE ON LINE NN. 

MOV 48203. ,ERRNBR {SELECT THE ERROR NUMBER. 

MOV 4ER7801,ERRBLK i SELECT THE ERROR PRINT ROUTINE. 

MOV 0EM8202,R1 ; SELECT THE ERROR MESSAGE. 
ERROR 



TRAP 



C$ERROR 



J ♦ 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 164120 



000020 



l - 



16$ 



60$ 



BIT 
BEQ 



INC 
CMP 

BLT 

CLR 
SETPRI 



ENDTST 



08IT06, OPTION 
60$ 



R3 

R3.0NUMLNS 

12$ 



CTRLCF 
0PRIO? 



jEXIT WITH TEST FAILURE MESSAGE IF 

jNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

I DURING THE SOFTWARE QUESTIONS. 

i SELECT THE NEXT LINE NUMBER. 

>TEST FOR ALL LINES DONE. 

I LOOP IF NOT ALL LINES DONE. 

{INDICATE THAT WE ARE NOT WITHIN A TEST, 

iDISABLE ALL INTERRUPTS. 

MOV *PRIO?,RO 
TRAP C$SPRI 



L 10024: 



TRAP 



C$ETST 



F9 
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SEQ 109 



4437 
4438 
4439 
4440 
444J 
4442 
4443 
4444 
4445 
4446 
4447 
4448 
4449 

4450 
4451 
4452 
4453 
4454 
4455 
4456 



4457 
4458 
4459 
4460 
4461 
4462 
4463 
4464 
4465 
4466 
4467 
4468 
4469 
44 70 
4471 

44 72 
4473 
4474 
44/5 
4476 
4477 
4478 
4479 
4480 
4481 
4482 
4483 
4484 
4485 
4486 
4487 
4488 
4489 
4490 



016070 
016070 



016070 
016076 
016100 
016104 
016104 
016110 

016112 
016120 
016126 
016134 
016142 



016150 
016154 
016156 



032767 
001002 
000167 

012700 
104441 
000007 
012767 
012767 
012767 
012767 
012767 



000002 
000420 
000240 



000007 
177777 
000001 
020155 
005445 



164076 



164106 
164074 
165654 
165650 
165644 



004 767 171652 

103402 

000167 000342 



016162 004767 171254 



016166 005003 

016170 010300 

016172 006300 

016174 036067 002310 

016202 001454 



016204 005000 

016206 012705 177777 



163770 



.SBTTL HARDWARE TEST - DCDMS - 



- DATA CARRIER DETECTED MODEM SIGNAL TEST - 

THIS TEST VERIFIES THAT THE DCD MODEM STATUS SIGNAL IS WORKING 

CORRECTLY, IT WILL ONLY BE PERFORMED IF EITHER 25 PIN OR STAGGERED 

LOOPBACK IS SPECIFIED. THIS TEST USES THE LOOPED BACK RTS SIGNALS 

TO TEST THE DCD SIGNAL, THIS TEST IS PERFORMED ON ALL THE ACTIVE 
LINES. 



I* 
{* 
{♦ 
;* 
; + 

i* 

BGNTST 

T7r : 
; * 

j ONLY PERFORM THIS TEST IF THE OUT IS IN EXTERNAL OR STAGGARED LOOPBACK MODE. 



$ - 



2$ 



BIT «eiTl t LOPBCK 

BNE 2* 

JMP 60$ 

SETPRI 0PRIO5 



TNUM -- TNUM ♦ 1 
MOV *TNUM,TSTNUM 
MOV O-l.CTRLCF 
MOV #1,ERRTYP 
MOV 08301,, ERRNBR 
MOV OEM8301.ERRMSG 



, CHECK TYPE OF LOOPBACK MODE SELECTED. 

{EXIT THIS TEST IF IN INTERNAL LOOPSACK. 

j ALLOW LTC INTERRUPTS. 

f.OV »PRI05,R0 
TRAP CISPRI 

{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

{SET UP THE TEST NUMBER. (83) 

{INDICATE THAT WE ARE IN A TEST. 

j SET ERROR TYPE IN ERROR TABLE. 

{SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

{SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



I ♦ 

{ RESET THE OUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE EIFO. 

t CLEAR TX AND RX INTERRUPT ENABLE BITS. 

\ THIS SUBROUTINE REPORTS ERROR >>>>> 8301 <<<<<. 

i - 

JSR PC.CLNRST {RESET THE DUT. 

BC5 4$ 

JMP 60$ ;ABORT THE TEST IF FATAL ERROR FOUND IN RESET. 

\ SET UP THE TX/RX ASSOCIATED LINE NUMBER TABLE. 

4*: JSR PC.ASLNTL ,SET UP THE ASSOCIATED LINE TABLES. 

J ♦ 

j SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

j THIS LOOP CLEARS ALL THE RTSS AND THEN SETS THEM INDIVIDUALLY AND WAITS FOR 

j A RESPONSE ON THE ASSOCIATED DCD SIGNAL. 

; THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET. 

I 

CLR R3 {CLEAR THE LINE COUNTER. 

6$: MOV R3.R0 

ASL RO 

BIT BITTBL(RO),ACTLNS 
BEQ 10$ {DON'T TEST IF NOT ACTIVE LINE. 

i CLEAR ALL THE DUT LNCTRL REGISTERS RTS BITS. 



CLR RO 

MOV #MAPLNS,Rb 



{SPECIFY TH/.T ALL LNCTRL BITS TO BE CLEARED. 
{SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED. 



G9 
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SEQ 110 



4491 
4492 
4493 
4494 
4495 
4496 
4497 
4498 
4499 
4500 
4501 
4502 
4503 
4504 
4505 
4506 
4507 
4508 
4509 
4510 
4511 
4512 
4513 
4514 
4515 
4516 
4517 
4518 
4519 
4520 
4521 
4522 

4523 
4524 
4525 
4526 
4527 
4528 
4529 
4530 
4531 
4532 
4533 
4534 
4535 
4536 
4537 
4538 
4539 
4540 
4541 
4542 
4543 
4544 
4545 
4546 



016212 
016216 
016222 



016226 
016232 
016240 



016242 
016246 
016252 



016260 
016264 
016270 
016274 
016300 



016302 
016302 
016310 
016316 
016322 
016322 



016324 
016332 



016334 
016336 
016342 



016344 
016346 
016350 
016352 
016360 



004767 173212 
012704 000050 
004767 171714 



010377 163746 
032777 010000 
001020 



116304 
010477 
052777 



010377 
012701 
016702 
004767 
103415 



012767 
012767 
012701 

104460 



163746 



003750 
163726 
010000 



163714 
140050 
163712 
173054 



020156 
006662 
005511 



163730 



165502 
165500 



032767 000100 
001474 



005203 

020327 000020 

002712 



163630 



005003 

010300 

006300 

036067 002310 

001455 



163612 



JSR 

MOV 
JSR 



PC.WTWLNC 
040. ,R4 
PC, DELAY 



j CLEAR ALL THE DUT RTS BITS, 

j DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 
J ♦ 
j CHECK THAT THE SPECIFIED DCD IS CLEAR, 



MOV R3.8CSRA 
BIT 0BIT12,S)FSLSA 
BNE 8* 



{SET IND.ADR.REG FIELD TO SELECTED LINE. 
jGO REPORT DCD IS BAD IF BIT IS NOT CLEAR. 



SET THE RTS FOR THE ASSOCIATED LINE. 

NOTE: IF THE ASSOCIATED LINE IS NOT SELECTED, RTS WILL NOT HAVE BEEN TESTED 
IN THE RTS TEST (ONLY AN ISSUE IN STAGGERED LOOPBAOO. 



M0V8 TXRLNBCR3),R4 

MOV R4.SCSRA 

BIS *6IT12,aLNCTRA 



{GET THE ASSOCIATED LINE NUMBER. 

;SET IND.ADR.REG FIELD TO ASSOCIATED LINE. 

I SET THE ASSOCIATED LINE RTS. 



t CHECK THAT THE SELECTED LINE DCD IS ACTIVE. 

MOV R3,S)CSRA jSET IND.ADR.REG FIELD TO SELECTED LINE. 

MOV 01*0050, Rl jPASS TIMEOUT OF 40 MILLI-SEC, AND BIT TO TEST. 

MOV FSLSA,R2 ;PASS THE ADDRESS OF THE REGISTER TO TEST. 

JSR PC.WAIBIS jWAIT FOR DCD TO BECOME SET OR TIMEOUT. 

BCS 10$ j SKIP ERROR REPORT IF SELECTED DCD IS SET. 

8$J {REPORT DCD MODEM CONTROL SIGNAL DEFECTIVE ON LINE NN. 



MOV 

MOV 

MOV 

ERROR 



08302, .ERRNBR 

OER7801.ERRBLK 

0EM8302,R1 



{SELECT THE ERROR NUMBER. 
{SELECT THE ERROR PRINT ROUTINE, 
{SELECT THE ERROR MESSAGE. 



TRAP 



C TERROR 



{ EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



10$ 



{ ♦ 



BIT 06IT06, OPTION 
BEQ 60* 



INC R3 
CMP R3.0NUMLNS 
BLT 6$ 



{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

{SELECT THE NEXT LINE NUMBER. 
jTEST FOR ALL LINES DONE. 
{LOOP IF NOT ALL LINES DONE. 



j SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

i THIS LOOP SETS ALL THE RTSS AND THEN CLEARS THEM INDIVIDUALLY AND WAITS FOR 

5 A RESPONSE ON THE SELECTED DCD SIGNAL. 

j THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET, 



12*2 



CLR 


R3 j 


MOV 


R3,R0 


ASL 


RO 


BIT 


BITTBL(R0),AUTLNS 


BEQ 


16$ j 



{CLEAR THE LINE COUNTER. 



{DON'T TEST IF NOT ACTIVE LINE. 



SET ALL THE DUT LNCTRL REGISTERS RTS MTS, 



H9 



SKHSSeW 


FUNC TST 


PART3 

- DCDMS 


MACRO t 


4547 








4548 016362 


012700 


010000 




4549 016366 


012705 


177777 




4550 016372 


004 767 


173032 




4551 016376 


012704 


000050 




4552 016402 


004 767 


171534 




4553 








4554 








4555 








4556 016406 


010377 


163566 




4557 016412 


032777 


010000 


163566 


4558 016420 


001420 






4559 








4560 








4561 








4562 








4563 








4564 016422 


116304 


003750 




4565 016426 


010477 


163546 




4566 016432 


042777 


010000 


163550 


4567 








4568 








4569 








4570 016440 


010377 


163534 




4571 016444 


012701 


140050 




4572 016450 


016702 


163532 




4573 016454 


004 76 7 


172620 




4574 016460 


103415 






4575 








4576 016462 








4577 016462 


012767 


020157 


165322 


4578 016470 


012767 


006662 


165320 


4579 016476 


012701 


005511 




4580 016502 








016502 


104460 






4581 








4582 








4583 








4584 








4585 016504 


032767 


000100 


163450 


4586 016512 


001404 






4587 








4588 








4589 016514 


005203 






4590 016516 


020327 


000020 




4591 016522 


002711 






4592 








4593 016524 


00506 7 


163472 




4594 016530 








016530 


012700 


000340 




016534 


104441 






4595 








4596 016536 








016536 








016536 


104401 
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MOV 0BIT12.R0 

MOV 0MAPLNS.R5 

JSR PC.WTWuNC 

MOV 040., R4 

JSR PC, DELAY 



SEQ 111 



{SPECIFY THAT RTS BITS ARE TO BE SET. 

j SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED, 

{SET ALL THE DUT RTS BITS. 



{DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 
CHECK THAT THE SPECIFIED DCD IS SET. 

{SET IND.ADR.REG FIELD TO SELECTED LINE. 
{GO REPORT DCD IS BAD IF BIT IS NOT SET. 



MOV 
BIT 
BEQ 



R3.QCSRA 
0BIT12,SFSLSA 

14$ 



CLEAR THE RTS FOR THE ASSOCIATED LINE. 

NOTE: IF TH€ ASSOCIATED LINE IS NOT SELECTED, RTS WILL NOT HAVE BEEN TESTED 
IN THE RTS TEST (ONLY AN ISSUE IN STAGGERED LOOPBACK). 



M0V8 TXRLN8(R3),R4 

MOV R4.&CSRA 

BIC 0BIT12.SLNCTRA 



jGET THE ASSOCIATED LINE NUMBER. 

{SET IND.ADR.REG FIELD TO ASSOCIATED LINE. 

j CLEAR THE ASSOCIATED LINE RTS. 



CHECK THAT THE SELECTED LINE DCD IS CLEAR. 



MOV R3,SCSRA 

MOV 0140050, Rl 

MOV FSLSA.R2 

JSR PC.WAIBIC 

BCS 16* 



jSET IND.ADR.REG FIELD TO SELECTED LINE. 
;PASS TIMEOUT OF 40 MILLI-SEC, AND BIT TO TEST, 
j PASS THE ADDRESS OF THE REGISTER TO TEST. 
; WAIT FOR DCD TO BECOME CLEAR OR TIMEOUT, 
;SKIP ERROR REPORT IF SELECTED DCD IS CLEAR. 



14$: 



{REPORT DCD MODEM CONTROL SIGNAL DEFECTIVE ON LINE NN. 

MOV 08303. V ERRN8R {SELECT THE ERROR NUMBER. 

MOV 0ER7801.ERRBLK {SELECT THE ERROR PRINT ROUTINE, 

MOV 0EM83O2.R1 jSEuECT THE ERROR MESSAGE, 
ERROR 



TRAP 



{ EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



C5ERR0R 



16* 



60$ 



BIT 
BEQ 



INC 
CMP 
BIT 

CL.R 
SETPRI 



ENDTST 



OB I T06, OPT ION 
60 4 



R3 

R3.0NUMLNS 

12* 



CTRLCF 
0PRI07 



{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

{SELECT THE NEXT LINE NUMBER. 
{TEST FOR ALL LINES DONE. 
{LOOP IF NOT ALL LINES DONE, 

{INDICATE THAT WE ARE NOT WITHIN A TEST. 

{DISABLE ALL INTERRUPTS. 

MOV OPRIO,\RO 

TRAP C5SPRI 



L 10025: 



TRAP 



CU.TST 



19 



CZDHWBO DHU-11 
HARDWARE TEST 

4598 
4599 

4600 
4601 
4602 
4603 
4604 
4605 
4606 
4607 
4608 
4609 



4610 
4611 

4ol2 
4613 
4614 
4615 
4616 



4617 
4618 
4619 
4620 
4621 
4622 
4623 
4624 
4625 
4626 
4627 
4628 
462^ 
4630 
4631 
4632 
4633 
4634 
4635 
4636 
4637 
4638 
4639 
4640 
4641 
4642 
4643 
4644 
4645 
4646 
464 7 
4648 
4649 
4650 
4651 



016540 
016540 



016540 
016546 
016550 
016554 
016554 
016560 

016562 
016570 

016576 
016604 

016612 



016620 
016624 
016626 



F'UNC 1ST PART J MACRO M1200 
- OTRINT - 
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SEQ 112 



016636 
016640 
016642 
016644 
016652 



016654 

016656 
016062 



032767 
001002 
000167 

012700 
104441 
000010 
012767 
012767 
012767 
012767 
012767 



005000 
012 705 
004767 



000002 
000400 
000240 



000010 
177777 
000001 
020321 
005555 



163426 



1634 36 
163424 
165204 
165200 
165174 



.SBTTl HARDWARF TEST - DTRINT - 

- DATA TERMINAL READY SIGNAL INTERACTIONS TEST - 

THIS TEST VERIFIES THAT THE DTR SIGNAL CAND THE LOOPED BACK DSR AND 
RI STATUS SIGNALS) DO NOT INTERACT WITH ANY OTHER MODEM STATUS SIGNALS, 
IT WILL ONLY BE PERFORMED IF EITHER 25 PIN OR STAGGERED LOOPBACK IS 
SPECIFIED. THIS TEST IS PERFORMED ON ALL ACTIVE LINES. 

BGNTST 

re : : 

ONLY PERFORM THIS TEST IF THE OUT IS IN EXTERNAL OR STAGGARED LOOP! K MOOE . 

{CHECK TYPE OF LOOPBACK MODE SELECTED. 

{EXIT THIS TEST IF IN INTERNAL LOOPBACK. 
2$i SETPRI 0PRI05 j ALLOW LTC INTERRUPTS. 

MOV OPRI05 # RO 
TRAP C$SPRI 
5 INCREMENT THE ASSEMBLY TIME TEST COUNTER, 
{SET UP THE TEST NUMBER. C84) 
{INDICATE THAT WE ARE IN A TEST. 
;SET ERROR TYPE IN ERROR TABLE. 
;SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
{SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

RESET THE DUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS. 
THIS SUBROUTINE REPORTS ERROR >>>^> 8401 <<<<<. 



BIT 


OBIT1.L0PBCK 


BNE 


2$ 


JMP 


60 i 


SETPRI 


0PRI05 


TNUM » 


- TNUM ♦ 1 


MOV 


OTNUM.TSTNUM 


MOV 


♦-1.CTRLCF 


MOV 


*1,ERRTYP 


MOV 


08401. .ERRNBR 


MOV 


0EM84O1.ERRMSG 



004 767 171202 

103402 

000167 000322 



016632 004 767 170604 



4J: 



005003 

010300 

006300 

036067 002310 

001450 



{RESET THE OUT. 

{ABORT THE TEST IF FATAL ERROR FOUND IN RESET. 
SET UP THE TX/RX ASSOCIATED LINE NUMBER TABLE, 



JSR 
BCS 
JMP 



PC.CLNRST 

4$ 

605 



JSR 



PC.ASLNTL 



{SET UP THE. ASSOCIATED LINE TABLES. 



SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION, 

THIS LOOP CLEARS ALL THE DTRS AND THEN SETS THEM INDIVIDUALLY AND CHECKS 

FOR ANY RESPONSES ON SIGNALS OTHER THAN THE ASSOCIATED RI ANO DSR SIGNALS. 
THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET. 



6$; 



163320 



CLR 
MOV 
ASl. 
BIT 
BEQ 



R3 

R3>R0 

RO 

BITTBL(RO),ACTLNS 



{CLEAR THE LINE COUNTER, 



8i {DON'T TEST IF NOT ACTIVE LINE. 

J ♦ 
{ CLEAR ALL THE DUT LNCTRl REGISTERS DTR BITS. 



1 7 7 7 1 1 
172542 



CLR RO 
MOV 0MAPLN5.R5 
JSR PC.WTWLNC 



iSPECIM THAT ALL LNCTRl. BITS TO BE CLEARED. 
{SPECIFi THAT ALL LNCTRL S ARE TO BE CHANGED. 
{CLEAR ALL THE OUT DTR BITS. 



J 9 
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HARDWARE TEST - DTRINT - 
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SEQ 113 



4652 


016666 


012704 


000050 




4653 


016672 


004 767 


171244 




4654 










4b55 










4656 










4657 


016676 


004767 


172120 




4658 










4659 










4660 










4661 


016702 


010377 


163272 




4662 


016706 


052777 


001000 


163274 


4663 


016714 


012704 


000050 




4664 


016720 


004 767 


171216 




4665 










4666 










4667 










4668 










4669 


016724 


116301 


003 750 




4670 


016730 


012702 


120000 




4671 


016734 


004 767 


171110 




4672 


016740 


103415 






4673 










4674 


016742 


012767 


020322 


165042 


4675 


016750 


012767 


006720 


165040 


4676 


016756 


012701 


005637 




4677 


016762 
016762 


104460 






4678 










4679 










4680 










4681 










4682 


016764 


032767 


000100 


163170 


4683 


016772 


001470 






4684 










4685 










4686 










4687 










4688 


016774 


005203 






4689 


016776 


020327 


000020 




4690 


017002 


002716 






4691 










4692 










4693 










4694 










4695 










4696 










4697 


017004 


005003 






4698 


017006 


010300 






4699 


017010 


006300 






4 700 


017012 


036067 


002310 


163152 


4701 


017020 


001451 






4 702 










4703 










4 704 










4705 


017022 


012700 


001000 




4 706 


017026 


012705 


177777 




4707 


017032 


004767 


172372 





MOV 
JSR 



040. ,R4 

PC, DELAY 



{DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE. 



RECORD THE STATES OF THE MODEM STATUS SIGNALS. 



JSR 



PC.SAVMST 



j SAVE THE PRESENT MODEM STATUS STATES. 



i SET THE DTR FOR THE SELECTED LINE. 



MOV R3.0CSRA 

BIS 0BIT9.OLNCTRA 

MOV 040., R4 

JSR PC, DELAY 



{SELECT THE SELECTED LINE IND.ADR.REG FIELD. 
jSET THE SELECTED LINE DTR. 

{ALLOW 40 MS FOR STATUS SIGNALS TO STABILIZE. 



CHECK THE PRESENT OUT STAT REGISTER CONTENTS AGAINST PREVIOUS. 
IF ANY UNDESIRED CHANGES HAVE TAKEN PLACE, REPORT THE ERRORS. 

MOVB TXRLN8(R3).Rl {SELECT SPECIAL TREATMENT FOR ASSOCIATED LINE. 
MOV 0eiT15!BIT13,R2 {IGNORE DSR ANO RI ON ASSOCIATED LINE. 

JSR PC,CMPMST {COMPARE OLD ANO NEW STAT CONTENTS. 

BCS 8$ {SKIP ERROR REPORT IF NO DISCREPANCIES FOUND. 

{REPORT INTERACTIONS FOUND BETWEEN DTR FOR LINE NN AND THE FOLLOWING SIGNALS; 
MOV 08402. .ERRNBR {SELECT THE ERROR NUMBER . 

{SELECT THE ERROR PRINT ROUTINE. 
{SELECT THE DTR ERROR MESSAGES. 
{ER8401 USES Rl, R2. AND R3 VALUES. 

TRAP C$ERROR 



MOV 

MOV 

ERROR 



0ER64O1,ERRBLI< 
0EM84O2.R1 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT 0BITO6, OPTION 
GEQ 60$ 



{EXIT WITH TEST FAILURE MESSAGE IF 

{NO EXTENDED ERROR REPORTING HA5 BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 



SELECT THE NEXT LINE AND LOOP IF NOT ALL POSSIBLE LINES HAVE BEEN HANDLED. 



8$: 



J * 



INC 


R3 


CMP 


R3.0NUMLNS 


BLT 


6$ 



{SELECT THE NEXT LINE NUMBER. 
{TEST FOR ALL LINES DONE. 
{LOOP IF NOT ALL LINES DONE. 



j SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

{ THIS LOOP SETS ALL THE DTRS AND THEN CLEARS THEM INDIVIDUALLY AND CHECKS 

{ FOR ANY RESPONSES ON SIGNALS OTHER THAN THE ASSOCIATED RI AND DSR SIGNALS 

j THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET. 



10$: 



CLR 
MOV 
ASL 
BIT 
BEQ 



R3 

R3,R0 

RO 

BITTBL(RO),ACTLNS 



{CLEAR THE LINE COUNTER. 



121 



{DON'T TEST IF NOT ACTIVE LINE. 



; ♦ 



SET ALL THE OUT LNCTRL REGISTERS DTR BITS. 



I - 



MOV 0BIT9.RO 
MOV 0MAPLNS,R'j 
JSR PC.WTWLNC 



{SPECIFY THAT DTR BITS ARE TO BE SET. 
{SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED. 
{SET ALL THE DUT DTR BITS. 



I<9 



C£QHW$0_DHU-11 FUNC TST parT3 



HARDWARE 

4 708 
4709 
4710 
4711 
4712 
4713 
4714 
4715 
4716 
4717 
4718 
4719 
4720 
4721 
4722 
4723 
4724 
4725 
4726 
4727 
4728 
4 729 
4730 
4731 
4732 
4733 

4734 
4735 
4736 
4737 
4738 
4739 
4740 
4741 
4742 
4743 
4 744 
4745 
4746 
4747 
4748 
4749 
4750 



MACRO M1200 
- DTRINT - 



15-MAR-84 09:41 PAGE 81-2 



SEQ 114 



4751 
4752 



017036 
017042 



017052 
017056 
017064 
017070 



017074 
017100 
017104 
017110 

017112 
017120 
017126 
017132 
017132 



017134 
017142 



017144 
017146 
017152 

017154 
017160 
017160 

017164 

017166 
017166 
017166 



012704 
004767 



010377 
042777 
012704 
004767 



116301 
012702 
004 767 
103415 

012767 
012767 
012701 

104460 



032767 
001404 



005203 
020327 
002715 

005067 

012700 
104441 



1C4401 



000050 
171074 



017046 004767 171750 



000020 

163042 
000340 



MOV 
JSR 



040. ,R4 
PC, DELAY 



} *■ 



163122 

001000 163124 

000050 

17104b 



003750 
120000 
170740 



020323 164672 
006720 164670 
005637 



MOV 


R3.QCSRA 


BIC 


06IT9,QLNCTRA 


MOV 


040. ,R4 


JSR 


PC, DELAY 



{DELAY FOR 40 M3 TO ALLOW SIGNALS TO SETTLE. 

{ RECORD THE STATES OF THE MODEM STATUS SIGNALS. 

JSR PC.SAVMST i SAVE THE PRESENT MODEM STATUS STATES. 

CLEAR THE DTR FOR THE SELECTED LINE. 

{SELECT THE SELECTED LINE IND.ADR.REG FIELD. 
»CLEAR THE SELECTED LINE DTR. 

i ALLOW 40 MS FOR STATUS SIGNALS TO STABILIZE. 

{ CHECK THE PRESENT DUT STAT REGISTER CONTENTS AGAINST PREVIOUS. 
j IF ANY UNDESIRED CHANGES HAVE TAKEN PLACE, REPORT THE ERRORS. 

MOVB TXRLN8(R3).R1 {SELECT SPECIAL TREATMENT FOR ASSOCIATED LINE. 

MOV *8IT15!BIT13,R2 {IGNORE DSR AND RI ON ASSOCIATED LINE. 
JSR PC.CMPMST {COMPARE OLD AND NEW STAT CONTENTS, 
BCS 12$ {SKIP ERROR REPORT IF NO DISCREPANCIES FOUND. 

{REPORT INTERACTIONS FOUND BETWEEN DTR FOR LINE NN AND THE FOLLOWING SIGNALS; 

MOV 08403., ERRNBR {SELECT THE ERROR NUMBER. 

MOV 0ER8401.ERRBLK {SELECT THE ERROR PRINT ROUTINE. 

MOV 0EM84O2.R1 {SELECT THE DTR fc'RROR MESSAGES. 
ERROR ,ER8401 USES Rl, R2, AND R3 VALUES. 

TRAP 



C$ERROR 



} ♦ 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 163020 



BIT OBIT06, OPTION 
BEQ 60$ 



{EXIT WITH TEST FAILURE MESSAGE IF 

jNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 



SELECT THE NEXT LINE AND LOOP IF NOT ALL POSSIBLE LINES HAVE BEEN HANDLED. 
12$: 



605 



INC 
CMP 
BLT 

CLR 
SETPRI 



ENDTST 



R3 

R3.0NUMLNS 

10$ 

CTRLCF 
0PRI07 



{SELECT THE NEXT LINE NUMBER. 
{TEST FOR ALL LINES DONE. 
{LOOP IF NOT ALL LINES DONE. 

{INDICATE THAT WE ARE NOT WITHIN A TEST. 

{DISABLE ALL INTERRUPTS. 

MOV OPRIO? t RO 
TRAP CSSPRI 



L 10026; 



TRAP 



C5ETST 



L9 



&»8e°Ws} 



1 FUNC TST PA 



4 754 
4755 
4756 

4757 
4 758 
4759 
4 760 
4761 
4762 
4763 
4 764 
4765 

4766 
4767 

4768 
4769 
4770 
4771 
4772 



4773 
4774 
4775 
4 776 
4777 
4778 
4779 
4 780 
4781 
4782 
4783 
4784 
4785 
4786 
4787 
4788 
4789 
4 790 
4791 
4 792 
4793 
4794 
4 795 
4796 
4797 
4 798 
4799 
4800 
4801 
4802 
4803 
4804 
4805 
4806 
4807 



017170 
017170 



017170 
017176 
017200 
017204 
017204 
017210 

017212 
017220 
017226 
017234 
017242 



017250 
017254 
017256 



Mi 



INT 



032767 
001002 
000167 

012700 
104441 
000011 
012767 
012767 
012767 
012767 
012767 



000002 
000400 
000240 



000011 
177777 
000001 
020465 
005662 



MACRO M1200 15-MAR-84 09:41 PAGE 82 

.SBTTL HARDWARE TEST - RTSINT - 

. «. + ** + **+** + **** + + *******+** + **** + ****************************+********* + *** + ** 

}* - REQUEST TO SEND SIGNAL INTERACTIONS TEST - 

{ * 

1 + THIS TEST VERIFIES THAT THE RTS SIGNAL CAND THE LOOPED BACK DCD AND CTS 

I* STATUS SIGNALS) DO NOT INTERACT WITH ANY OTHER MODEM STATUS SIGNALS, 

I* IT WILL ONLY BE PERFOR "ED IF EITHER 25 PIN OR STAGGERED LOOPBACK IS 

;* SPECIFIED. THIS TEST IS PERFORMED ON ALL ACTIVE LINES. 
j + 

BGNTST 

T9:: 

ONLY PERFORM THIS TEST IF THE DUT IS IN EXTERNAL OR STAGGARED LOOPBACK MODE. 

j CHECK TYPE OF LOOPBACK MODE SELECTED, 



SEQ 115 



162776 



163006 
162774 
164554 
164550 
164544 



004767 170552 

103402 

000167 000322 



017262 004767 170154 



017266 005003 

017270 010300 

017272 006300 

017274 036067 002310 

017302 001450 



017304 005000 

017306 012/05 1/7777 

017312 004767 172112 



162670 



2$ 



BIT 


tfBITl.LOPBCK 


BNE 


2$ 


JMP 


60$ 


SETPRI 


*PRI05 



TNUM -- TNUM ♦ 1 
MOV OTNUM.TSTNUM 
MOV O-l.CTRLCF 
MOV Ol.ERRTYP 
MOV 08501. .ERRNBR 
MOV 0EM8501.ERRMSG 



{EXIT THIS TEST IF IN INTERNAL LOOPBACK. 

{ALLOW LTC INTERRUPTS. 

MOV £PRI05,R0 
TRAP CSSPRI 

{INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

j SET UP THE TEST NUMBER. C85) 

j INDICATE THAT WE ARE IN A TEST. 

{SET ERROR TYPE IN ERROR TABLE. 

I SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

j SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



i ♦ 



; RESET THE DUT TO A KNOUN STATE, REMOVE STATUS CODES FROM THE FIFO. 

i CLEAR TX AND RX INTERRUPT ENABLE BITS. 

I THIS SUBROUTINE REPORTS ERROR >>>>> 8501 <<<<<. 



JSR 
BCS 

JMP 



PC.CLNRST 

4$ 

60$ 



{ ♦ 



{RESET THE DUT. 

{ ABORT THE TEST IF FATAL ERROR FOUND IN RESET. 
SET UP THE TX/RX ASSOCIATED LINE NUMBER TABLE. 

JSR PC.ASLNTL ;SET UP THE ASSOCIATED LINE TABLES. 



4$i 

l * 

{ SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

5 THIS LOOP CLEARS ALL THE RTSS AND THEN SETS THEM INDIVIDUALLY AND CHECKS 

{ FOR ANY RESPONSES ON SIGNALS OTHER THAN THE ASSOCIATED DCD AND CTS SIGNALS. 

j THIS LOOP WILL CLEAR THE TX.IE AND RX.IE BITS IF THEY ARE SET. 

I - 

CLR R3 j CLEAR THE LINE COUNTER. 

6$: MOV R3.R0 

ASl RO 

BIT BITTBL(RO),ACTLNS 
BEQ 8$ {DON'T TEST IF NOT ACTIVE LINE. 

J ♦ 

} CLEAR ALL THE DUT LNCTRL REGISTERS RTS BITS. 

\ - 

CLR RO {SPECIFY THAT ALL LNCTRL BITS TO BE CLEARED, 

MOV 0MAPLNS.R5 (SPECIFY THAT ALL LNCTRLS ARE TO BE CHANGED, 
JSR PC.UTWLNC {CLEAR ALL THE DUT RTS BITS. 



M9 
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HARDWARE TEST - RTSINT - 



SEQ 116 



4808 
4809 
4810 
4811 
4812 
4813 
4814 
4815 
4816 
4817 
4818 
4819 
4820 
4821 
4822 
4823 
4824 
4825 
4826 
4827 
4828 
4829 
4830 
4831 
4832 
4833 

4834 
4835 
4836 
4837 
4838 
4839 
4840 
4841 
4842 
484 3 
4844 
4845 
4846 
4847 
4848 
4849 
4850 
4851 
4852 
4853 
4854 
4855 
4056 
4857 
4858 
4859 
4860 
4861 
4862 
4863 



017316 
017322 



017332 
017336 
017344 
017350 



017354 
017360 
017364 
017370 

017372 
017400 
017406 
017412 
017412 



017414 
017422 



017424 
017426 
017432 



012704 
004767 



017434 
017436 
017440 
017442 
017450 



017452 
017456 
017462 



010377 
0527 77 
012704 
004767 



116301 
012702 
004 767 
103415 

012767 

012767 
012701 

104460 



000050 
170614 



017326 004767 171470 



012700 
012/05 
004767 



162642 
010000 
000050 
170566 



003750 
014000 
170460 



020466 
006720 
005744 



032767 000100 
001470 



005203 

020327 000020 

002716 



005003 

010300 

006300 

036067 0C231O 

001451 



010000 

mm 

171742 



MOV 
JSR 



040, ,R4 
PC, DELAY 



i ♦ 



162644 



164412 
164410 



162540 



j DELAY FOR 40 MS TO ALLOW Si:::.*L^ .U SETTLE. 

? RECORD THE STATES OF THE MODEM STATUS SIGNALS. 
> _ 

JSR PC.SAVMST jSAVE THE PRESENT MODEM STATUS STATES. 

! SET THE RTS FOR THE SELECTED LINE. 

I - 

MOV R3.SCSRA {SELECT THE SELECTED LINE IND.ADR.REG FIELD. 

BIS 0BIT12,S)LNCTRA {SET THE SELECTED LINE RTS. 

MOV 040.. R4 

JSR PC, DELAY jALLOW 40 MS FOR STATUS SIGNALS TO STABILIZE. 

CHECK THE PRESENT DUT STAT REGISTER CONTENTS AGAINST PREVIOUS. 
IF ANY UNDESIRED CHANGES HAVE TAKEN PLACE, REPORT THE ERRORS. 

MOVB TXRLN8(R3),R1 {SELECT SPECIAL TREATMENT FOR ASSOCIATED LINE. 

MOV *BIT12!BITU.R2 {IGNORE DCD AND CTS ON ASSOCIATED LINE. 

JSR PC.CMPMST j COMPARE OLD AND NEW STAT CONTENTS. 

BCS 8$ {SKIP ERROR REPORT IF NO DISCREPANCIES FOUND. 

jREPORT INTERACTIONS FOUND BETWEEN RTS FOR LINE NN AND THE FOLLOWING SIGNALS: 

MOV 08502. ,ERRNBR i SELECT THE ERROR NUMBER. 

MOV 0ER8401.ERRBLK {SELECT THE ERROR PRINT ROUTINE. 

MOV 0EM8502,R1 jSELECT THE RTS ERROR MESSAGES. 

ERROR } ER1901 USES Rl, R2, AND R3 VALUES. 

TRAP C$ERROR 

t EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

BIT OBIT06, OPTION {EXIT WITH TE5T FAILURE MESSAGE IF 

BEQ 60$ j NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

jDURING THE SOFTWARE QUESTIONS. 

SELECT THE NEXT LINE AND LOOP IF NOT ALL POSSIBLE LINES HAVE BEEN HANDLED, 

8* J INC R3 {SELECT THE NEXT LINE NUMBER. 

{TEST FOR ALL LINES OONE , 
{LOOP IF NOT ALL LINES DUNE. 

{ * 

j SET UP A LOOP WHICH HANDLES ONE LINE PER ITERATION. 

j THIS LOOP SETS ALL THE RTSS AND THEN CLEARS THEM INDIVIDUALLY AND CHECKS 

{ FOR ANY RESPONSES ON SIGNALS OTHER THAN THE ASSOCIATED DCD AND CTS SIGNALS. 

\ THIS LOOP WILL CLEAR THE TX.l'E AND RX.IE BITS IF THEY ARE SET. 



INC 


R3 


CMP 


R3,tfNUMLN5 


BLT 


6$ 



16252a 



10$: 



i * 



CLR 
MOV 
ASL 
BIT 
BEQ 



R3 

R3.R0 

RO 

BITTP1 (RO).ACTLNS 



{CLEAR THE LINE COUNTER. 



12$ 



,DON'T TEST IF NOT ACTIVE LINE. 



{ SET ALL THE DUT LNCTRL REGISTERS RTS BITS. 



MOV OBIT12.R0 

MOV OMAPLNS,Rt> 

JSR PC.WTWLNC 



{SPECIFY THAT RTS BITS ARE TO BE SET. 
{SPECIFY THAT ALL LNCTRL S ARE TO BE CHANGED. 
iSET ALL THE DUT RTS BITS. 



N9 
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HARDWARE TEST - RTSINT - 



SEQ 117 



4864 
4865 
4866 
4867 
4868 
4869 
4870 
4871 
4872 
4873 
4874 
4875 
4876 
4877 
4878 
4879 
4880 
4881 
4882 
4883 
4884 
4885 
4886 
4887 
4888 
4889 

4890 
4891 
4892 
4893 
4894 
4895 
4896 
4897 
4898 
4899 
4900 
4901 
4902 
4903 
4904 
4905 



4906 
4907 



017466 
017472 



012704 
004 767 



000050 
170444 



MOV 
JSR 



#40. ,R4 
PC, DELAY 



5 DELAY FOR 40 MS TO ALLOW SIGNALS TO SETTLE . 



017476 004767 171320 



017502 
017506 
017514 
017520 



017524 
017530 
017534 
017540 

017542 
017550 
017556 
017562 
017562 



017564 
017572 



01" 574 
01/576 
017602 

017604 
017610 
017610 
017614 

017616 
017616 
017616 



010377 
042777 

012704 
004767 



116301 
012702 
004767 
103415 

012767 
012767 
012701 

104460 



032767 
001404 



005203 



020327 000020 
002715 



005067 

012700 
104441 



104401 



162412 
000340 



i RECORD THE STATES OF THE MODEM STATUS SIGNALS, 
I - 

JSR PC.SAVMST jSAVE THE PRESENT MODEM STATUS STATES, 

CLEAR THE RTS FOR THE SELECTED LINE. 



162472 

010000 162474 

000050 

170416 



003750 
014000 
170310 



020467 164242 
006720 164240 
005744 



MOV R3.8CSRA 

BIC 0BIT12.QLNCTRA 

MOV 040. ,R4 

JSR PC. DELAY 



{SELECT THE SELECTED LINE 1ND.ADR.REG FIELD. 
iCLEAR THE SELECTED LINE RTS. 

s ALLOW 40 MS FOR STATUS SIGNALS TO STABILIZE. 



000100 162?7t 



{ CHECK THE PRESENT DUT S^AT REGISTER CONTENTS AGAINST PREVIOUS. 
i IF ANY UNDESIRED CHANGES HAVE TAKEN PLACE, REPORT THE ERRORS. 

MOVB TXRLNB(R3),R1 j SELECT SPECIAL TREATMENT FOR ASSOCIATED LINE. 

MOV 0BIT12JBIT11.R2 i IGNORE DCD AND CTS ON ASSOCIATED LINE. 
JSR PC.CMPMST i COMPARE OLD AND NEW STAT CONTENTS. 
BCS 12$ {SKIP ERROR REPOR I IF NO DISCREPANCIES FOUND. 

{REPORT INTERACTIONS FOUND BETWEEN RTS FOR LINE NN AND THE FOLLOWING SIGNALS; 

MOV 08503. .ERRNBR {SELECT THE ERROR NUMBER. 

MOV 0ER8401.ERRBLK {SELECT THE ERROR PRINT ROUTINE. 

MOV 0EM8502.R1 {SELECT THE RTS ERROR MESSAGES. 
ERROR }ER1901 USES Rl, R? AND R3 VALUES. 

TRAP C$ERROR 

j EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

I - 

BIT OBITO6.0PTI0N {EXIT WITH TEST FAILURE MESSAGE IF 
BEQ 60$ jNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

{DURING THE SOFTWARE QUESTIONS. 

! SELECT THE NEXT LINE AND LOOP IF NOT ALL POSSIBLE LINES HAVE BEEN HANDLED. 



12$ 



60$ 



INC 
CMP 
BLT 

CLR 
SETPRI 



ENDTST 



R3 

R3.0NUMLNS 

10$ 

CTRLCF 

0PRI07 



{SELECT THE NEXT LINE NUMBER. 
{TEST FOR ALL LINES DONE. 
iLOOP IF NOT ALL LINES DONE. 

{INDICATE THAT WE ARE NOT WITHIN A TEST. 

{DISABLE ALL INTERRUPTS. 

MOV OPRI07.R0 
TRAP C$SPRI 



L10027: 



TRAP 



C$tTST 



CZDNWBO DHU-11 
HARDWARE TEST 



^W9 

4<no 

4^11 
4912 
4915 
4914 
4915 
4916 
491 7 
4918 
4919 



4920 
4921 
4922 
4923 
4924 
4925 
4926 
492 7 
4926 
49?9 
4930 
4951 
4932 
4933 



4954 
4 935 
4956 
4957 
4936 



017620 

017620 

017620 
017626 
017634 
017640 
017644 
017646 



017650 
017654 
017654 
01 7656 
01 7660 
017662 

017664 

0176 72 
0176 76 
0176 76 
01767* 



FUNC TST 



000012 
01c? 767 
012767 
016702 
012703 
020203 
0014 U 



01P/67 

005067 

104401 



PART 5 MACRO 
- REPBMP 



M1200 15 -MAR 84 09:41 
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PAGE 83 



SEQ 116 



000012 
177777 
162510 
002352 



162400 
162366 



.SBfTL HARDWARE TEST - REPBMP - 

- REPORT ANY BMP COOES IN THE QUEUE - 
THIS IS A PSEUOO-TEST USED TO REPORT ANY BMP CODES THAT WERE F OUNO 
IN THE DUT'S FIFO DURING PREVIOUS TEST, AND LOGGED IN THE BMP CODE 
QUEUE. 

IT IS UNLIKELY THAT RUNNING THIS PSEUOO-TEST ALONE WILL PRODUCF ANY 
ERROR REPORTS. 

- tit************************************************************************ 
BGNTST 

T10: : 
I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
iSET UP THE TEST NUMBER. (93) 
lINOICATE THAT WE ARE IN A TEST. 
iGET THE CONTENTS Of THE POINTER. 
iGET THE START ADDRESS OF THE QUEUE. 
I SEE IF THE POINTER HAS MOVED FROM THE BASE. 
jEXIT NO COOES IN THE QUEUE.. 
J • 
l THERE IS AT LEAST ONE BMP CODE IN THE QUEUE. REPORT THE ERROR. 

J • 

jREPORT ERROR BMP COOE FOLf*) IN TEST NN, BMP COOE:NNNNNN" 



TNUM 


"■ TNUM ♦ 1 


MOV 


♦TNUM, fSTNUM 


MOV 


•-1.CTRI CF 


MOV 


BMPCQP.H2 


MOV 


«6MPCQB»R3 


CMP 


R2.R3 


BEQ 


60$ 



012701 006124 

10445b 
022125 
005 750 

00 7176 



MOV 
ERROF 



•EM9304.R1 i PASS THE FIRST MESSAGE TO BE REORTED. 

9301,EM9301,ER9301 » >>>>> ERROR *9301 <<<<<, 

TRAP CIERDF 

.WORD 9301 
.WORO EM9301 
.WORD ER9301 



002352 
162324 



162456 



60 % 



MOV 

CLR 

ENOTST 



oeMPCQB.eMPCQP 
CTRLCF 



iSFT POINTER BACK TO THE BFGINING OF THE QUE:. 
I INDICATE THAT WE ARE NOT WITHIN A TEST. 

L 10030; 



TRAP 



CIF.TST 
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CIO 

PAGE 84 



SEQ U9 



494 7 










4948 










494* 










4950 










4951 










4952 










4955 










4954 










4955 










4956 










495 7 










4958 










4959 










4960 










4961 










4962 


017 700 

017 700 
017702 


000016 






4965 










49/5 










4974 


01770? 
017702 
017704 
017706 
017710 


000051 

017756 
160000 
177776 






4975 










4976 


017712 

017712 
017 714 
017716 
017/20 
01772? 


00105? 
017754 
177777 
OOOOOO 
177777 






497 7 










4978 


017724 

017724 
017726 
017750 
017 752 
017754 


00205? 

0?0002 
00057 7 
OOOOO 1 
000005 






4979 










4960 










4981 


017756 
017 756 








498? 










4989 










4990 


017756 


105 


12* 


122 




017741 


040 


101 


104 




017 744 


104 


122 


105 




017 74 7 


125 


125 


072 




017752 


040 


000 




4991 


017 754 


101 


10? 


124 




017757 


111 


126 


105 




01776? 


040 


114 


111 




017 765 


116 


105 


040 




0177 70 


10? 


111 


1?4 




017773 


040 


115 


101 



.SBTTL. HARDWARt. PARAMETER CODING SECTION 



I ♦♦ 

I THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
» THAT ARE USFO BY THE SUPERVISOR TO BUILD P -TABLES, THE 
i MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
j INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES, THE 
I MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
j WITH THE OPERATOR. 
» * - 



BGNHRD 



iDEVICE CSR ADDRESS QUESTION: 

GPRMA HWPTQ1,0,0, 160000, 177 776, YES 



{ACTIVE LINES BIT MAP QUESTION: 

GPRMO HWP TQ2 , 2 , f MAPLNS , , 1 7 7 7 7 7 , YE S 



LJHARD: 



j TYPE OF LOOPBACK QUESTION: 

GPRMD HWPTQ5,4,0,577,1,5,YES 



ENDHRD 



HWPTQlj .ASCI/ /CSR ADDRESS: / 



HWPTQ2i »ASCU /ACTIVE LINE BIT MAPj • 



.WORD L10031-LJHARD/2 



L100311 



.WORD 
.WORD 
.WORD 
.WORD 



.WORD 
.WORD 
.WORD 
.WORO 
,WORD 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



.EVEN 



TICODE 

HWPTQ1 

TILOLIM 

TtHILIM 



TICODE 
HWPTQ? 
MAPLNS 

TILOLIM 
TIHILIM 



TICODE 

HWPTQ5 

577 

TILOLIM 

TIHILIM 



D10 



mmzmihksmmy&tuhi^* M120 ° i5 - mar - 8 " m <" 
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^EQ 120 



020001 


4S8 


072 


040 


499c? 020002 


124 


131 


120 


020005 


105 


040 


117 


020010 


106 


040 


114 


020013 


117 


117 


120 


020016 


102 


101 


103 


020021 


113 


040 


050 


020024 


061 


075 


111 


02002 7 


116 


124 


105 


020032 


122 


116 


101 


0200^5 


114 


054 


040 


020040 


062 


075 


110 


020043 


063 


060 


062 


020046 


071 


040 


117 


020051 


122 


040 


110 


020054 


063 


062 


06 7 


020057 


067 


054 


040 


020062 


063 


075 


110 


020065 


063 


062 


065 


020070 


051 


072 


000 


4993 








4994 









HWPTQ3; ,ASCIZ /TYPE OF UOOPBACK CWNTERNAL. 2-H3029 OR H3277, 3-H325):/ 



.EVEN 



E10 
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SEQ 121 



5003 










5004 










5005 










5006 










5007 










5008 










5009 










5010 










5011 










5012 










5013 










5014 










5015 










5016 


020074 
020074 
020076 


000014 






5017 










5026 










5027 


020076 
020076 
020100 
02010? 


000130 
020126 
000020 






5028 










5029 


020104 
020104 
020106 
020110 


000130 
020202 
000100 






5030 










5031 










5032 










5033 


020112 
020112 


006044 






5034 










5035 










5036 


020114 
020114 
020116 
020120 
020122 
020124 


001052 
020235 
177777 
OOOOOO 
177777 






5037 










5038 










5039 










5040 


020126 
020126 








5041 










5042 










5049 


020126 


122 


105 


120 




020131 


117 


122 


124 




020134 


040 


125 


116 




020137 


111 


124 


040 




020142 


116 


125 


115 




020145 


102 


105 


122 




020150 


040 


101 


123 




020153 


040 


105 


101 




020156 


103 


110 


040 



SBTTL SOFTWARE PARAMETER CODING SECTION 



THE SOFTWARE PARAMETER COOING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P- TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 



BGNSFT 



;UNIT NUMBER PRINTOUT QUESTION: 
GPRML SWPTQ1, 0,20, YES 



jEXTENDED ERROR REPORTING QUESTION: 
GPRML SWPTQ2 , , 100 , YES 



J * 



L$SOFT:: 



.WORD L 10032 -LSSOFT/2 



.WORD T5C0DE 
.WORD SWPTQ1 
.WORD 20 



.WORD TiCODE 
.WORD SWPTQ2 
.WORD 100 



i IF EXTENDED ERROR REPORTING IS NOT REQUIRED THEN SKIP THE NEXT QUESTION. 

XFERF ENDO 

.WOflD T$CODE 



{NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE QUESTION: 
GPRMD SWPTQ3,2,D.177777,0,17 777 7,YES 



.EVEN 
ENDO: ENDSFT 



L10032: 



.WORD T$C0DE 

.WORD SWPTQ3 

.WORD 177777 

.WORD T$L0LIM 

.WORD T$HILIM 



.EVEN 



SWPTQ1: .ASCIZ /REPORT UNIT NUMBER AS EACH UNIT IS TESTED: / 



F10 



DHWBQ DHU-11 TUNC TST PART 3 MACRO M1200 
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020161 


125 


116 


111 


020164 


124 


040 


111 


020167 


123 


040 


124 


020172 


105 


123 


124 


020175 


105 


104 


072 


020200 


040 


000 




5050 020202 


105 


130 


124 


020205 


105 


116 


104 


020210 


105 


104 


040 


020213 


105 


122 


122 


020216 


117 


122 


040 


020221 


122 


105 


120 


020224 


117 


122 


124 


020227 


111 


116 


107 


020232 


072 


040 


000 


5051 020235 


116 


125 


115 


020240 


102 


105 


122 


020243 


040 


117 


106 


020246 


040 


111 


116 


020251 


104 


111 


126 


0202S4 


111 


104 


125 


020257 


101 


114 


040 


020262 


104 


101 


124 


020265 


101 


040 


105 


020270 


122 


122 


117 


020273 


122 


123 


040 


020276 


124 


117 


040 


020301 


122 


105 


120 


020304 


117 


122 


124 


020307 


040 


117 


116 


020312 


040 


101 


040 


020315 


114 


111 


116 


020320 


105 


072 


040 


020323 


000 
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SEQ 122 



SWPTQ2: .ASCIZ /EXTENDED ERROR REPORTING! / 



SWPTQ3; .ASCIZ /NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE: / 



5052 



.EVEN 



G10 
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SEQ 123 



5061 
5062 
5063 
5064 
5065 
5072 
5073 
5074 
5075 
5076 



5077 
5078 
5079 
5080 
5081 
5082 
5083 
5084 
5085 



020324 

020324 



$PATCH; : 



,BLKW 24 



020374 

020374 
020376 
020400 
020400 



LASTAD 



000000 
000000 



L$LAST:: 



EVEN 

WORD 
WORD 



ENDMOD 



000001 



.END 

















1 


H10 










CZDHWBO 
SYMBOL 


T^E 11 


FUNC 


TST PART3 


MACRO M1200 


15 -MAR -84 


09:41 PAGE 


86-1 










ACTLNS 


002172 


G 


CJAUTO- 


000061 


EDROP 


012512 




EVL 


000004 G 


IES. T 


00223C 


G 


ADR 


000020 


G 


C$BRK - 


000022 


EF.CON- 


000036 


G 


EXOERR 


002224 G 


ISR 


« 000100 


G 


ADRPTR 


010010 


G 


C$BSEG- 


000004 


EF.NEW- 


000035 


G 


E$END - 


002100 


IXE 


■ 004000 


G 


ALTFLD 


007370 


G 


C*BSUH» 


000002 


EF.PWR- 


000034 


G 


Eil.OAD- 


000035 


I*AU 


■ 000041 




ASl.NTL 


007442 


G 


C*CEFG- 


000045 


EF.RES- 


000037 


G 


FDhTA 


002206 G 


I$AUTO« 


• 000041 




ASSEMB* 


000010 




CJCLCK- 


000062 


EF.STA- 


000040 


G 


FDATO - 


■ 000006 G 


liCLN ■ 


■ 000041 




BCOUNT 


002274 


G 


CJCLEA- 


000012 


EF0503 


004116 


G 


FSLSA 


002206 G 


I*DU « 


• 000041 




BITTBL 


002310 


G 


C*CLOS« 


000035 


EF1601 


004123 


G 


FSLSO - 


000006 G 


IIHRD ' 


' 000041 




BITO = 


000001 


G 


C*CLP1» 


000006 


EF7801 


004155 


G 


F$AU - 


000015 


I$INIT« 


« 000041 




BITOO - 


000001 


G 


C*CVEC» 


000036 


EF8401 


004213 


G 


F$AUTO- 


000020 


IJMOD « 


■ 000041 




BITOl * 


000002 


G 


C$DCLN« 


000044 


EF8402 


004305 


G 


F*BGN ■ 


000040 


IJMSG ■ 


• 000041 




BIT02 * 


000004 


G 


C*D0DU» 


000051 


EF9301 


004423 


G 


F*CLEA« 


000007 


I*PR0T 


■ 000040 




BIT03 * 


000010 


G 


CJDRPT" 


' 000024 


EF9302 


004501 


G 


FIDU - 


• 000016 


UPTAB' 


■ 000041 




BIT04 » 


000020 


G 


C$DU « 


■ 000053 


EM0101 


010376 


G 


F*END - 


00004 1 


IiPWR • 


■ 000041 




BIT05 * 


000040 


G 


C$EDIT« 


> 000003 


EM0102 


010462 


G 


FIHARD- 


• 000004 


I$RPT < 


• 000041 




BIT06 - 


000100 


G 


C*ERDF" 


■ 000055 


EM0103 


004632 


G 


F$HU » 


• 000013 


IISEG • 


• 000041 




BIT07 * 


000200 


G 


C*ERHR« 


- 000056 


EM1601 


004670 


G 


F*INI7« 


• 000006 


I*SETU' 


• 000041 




BIT08 * 


000400 


G 


C*ERR0« 


■ 000060 


EM7801 


004 753 


G 


F$JMP • 


• 000050 


I$SFT 


■ 000041 




BIT09 * 


001000 


G 


CiERSF' 


- 000054 


EM7802 


005015 


G 


F*MOD ■ 


• 000000 


IiSRV • 


• 000041 




Bin - 


000002 


G 


CJERSO- 


• 000057 


EM7901 


005035 


G 


F$MSG • 


• 000011 


I*SU8 


• 000041 




BITIO » 


002000 


G 


CfESCA- 


■ 000010 


EM7902 


005077 


G 


FiPROT- 


■ 000021 


I*TST i 


- 000041 




BIT11 - 


004000 


G 


CiESEG' 


■ 000005 


EM8001 


005117 


G 


F$PWR • 


■ 000017 


J*JMP ' 


- 000167 




BIT12 * 


010000 


G 


C$ESU6' 


» 000003 


EM8002 


005163 


G 


FIRPT • 


• 000012 


LGRP1M 


002232 


G 


BIT13 * 


020000 


G 


C$ETST> 


■ 000001 


EM8101 


005227 


G 


F$SEG « 


■ 000003 


LGRP2M 


002234 


G 


BIT14 « 


040000 


G 


C*EXIT« 


■ 000032 


EM8102 


005272 


G 


FISOFT- 


• 000005 


LNCTRA 


002210 


G 


BIT15 » 


100000 


G 


CIGETB' 


■ 000026 


EM8201 


005335 


G 


F$SRV 


■ C00010 


LNCTRO 


• OOOOIO 


G 


BIT2 = 


0O0O04 


G 


CSGETW' 


« 000027 


EM8202 


005401 


G 


F$sue • 


• 000002 


LOE 


« 040000 


G 


BIT3 * 


OOOOIO 


G 


C$GMAN« 


« 000043 


EM8301 


005445 


G 


FISW ' 


• 000014 


LOPBCK 


002174 


G 


BIT4 = 


000020 


G 


CiGPHR 


- 000042 


EM8302 


005511 


G 


FITEST' 


• 000001 


LOT 


- OOOOIO 


G 


BIT5 * 


000040 


G 


C$GPLO' 


- 000030 


EM8401 


005555 


G 


GETPRM 


012170 


LPCSLT 


- 000036 


G 


BIT6 * 


000100 


G 


C$GPRI« 


• 000040 


EM8402 


005637 


G 


GICNTO' 


• 000200 


LPRA 


002204 


G 


BIT7 * 


000200 


G 


C$INIT« 


■ 0OOO11 


EM8403 


005643 


G 


G$0ELM« 


■ 000372 


LPRO 


• 000004 


G 


BIT8 - 


000400 


G 


CUNLP- 


• 000020 


EM8404 


005647 


G 


GiDISP' 


■ 000003 


L5ACP 


002110 


G 


BIT9 » 


001000 


G 


CIMANI 


- 000050 


EM8405 


005652 


G 


GIEXCP" 


■ 000400 


LIAPT 


002036 


G 


BMPCQ6 


002352 


G 


CIMEM • 


- 000031 


EM8406 


005656 


G 


G$HILI 


« 000002 


L*AU 


012520 


G 


BMPCUC 


002552 


G 


CIMSG - 


■ 000023 


EM8501 


005662 


G 


GJLOLI 


■ 000001 


L*AUT 


002070 


G 


BMPCQP 


002350 


G 


CiOPEN- 


- 0OO034 


F.M8502 


005744 


G 


GINO 


■ 000000 


L$AUT0 


012370 


G 


BOE 


000400 


G 


CIPNTB 


- 000014 


EM9301 


005750 


G 


GIOTFS 


• 000400 


LICCP 


002106 


G 


BPLEVL. 


002175 


G 


C*PNTF 


• 000017 


EM9302 


006027 


G 


G10FSI 


■ 000376 


L$CLF.A 


012372 


G 


BLTBAS 


002650 


G 


CiPNTS 


■ 000016 


EM9303 


00605 7 


G 


GIPRMA 


• 000001 


L*CO 


002032 


G 


BLFENC 


003650 


G 


CIPNTX 


• 000015 


EM9304 


006124 


G 


G$PRMO 


■ 000002 


LJDEPO 


002011 


G 


BUFMID 


003250 


G 


C$QIO 


- 000377 


ENOD 


020126 




GiPRML 


- 000000 


L$DESC 


004070 


G 


BUTPTR 


002220 


G 


CtRDBU 


- 000007 


ENOETR 


003650 


G 


G1RADA 


• 000140 


L*DESP 


002076 


G 


BIJF5QT 


003450 


G 


CIREFG 


■ 00004 7 


ENDIT 


012354 




G$RADB 


- 000000 


L$DEVP 


002060 


G 


CALM5L 


007552 


G 


CIRESE 


« 000033 


ERCNTB 


002551 


G 


GiRADD 


■ 000040 


LiDISP 


002124 


G 


CKTRAP 


007776 


G 


CIREVI 


• 000003 


ERLTBL 


002650 


G 


G1RADL 


• 000120 


L*DLY 


002116 


G 


CLKBRL 


002260 


G 


CIRFLA 


■ 000021 


ERRBLK 


004016 


G 


GiRADO 


■ 000020 


L*DTP 


002040 


G 


CLKCSR 


002256 


G 


C$RPT 


- 000025 


ERRMSG 


004014 


G 


GiXFER 


■ 000004 


LIDTYP 


002034 


G 


CLKHRZ 


002264 


G 


CiSEFG 


- 000046 


ERRN8R 


004012 


G 


GIYES 


- 000010 


L*DU 


012410 


G 


CLKINT 


011460 


G 


CISPRI 


- 000041 


ERRTYP 


004010 


G 


HELP 


■ 000000 


LIDUT 


0020 72 


G 


CLKVEC 


002262 


G 


CISVEC 


- 000037 


ERSiiRF 


002552 


G 


HOE 


• 100000 G 


L*DVTY 


004060 


G 


CLNRST 


010026 


G 


CITPRI 


■ 000013 


ER0101 


006200 


G 


HWPTQ1 


017736 


LIEF 


002052 


G 


CMPMST 


010050 


G 


DELAY 


010142 G 


ER0503 


006532 


G 


HUPTQ2 


017754 


LIENVI 


002044 


G 


CSRA 


002200 


G 


DFPTBL 


002152 G 


ER1603 


006570 


G 


HWPTQ3 


020002 


L$ERRT 


00401C 


G 


CSRO > 


000000 


G 


DIAGMC 


« 000000 


ER7801 


006662 


G 


IBE 


' 010000 G 


L. $ETP 


002102 


G 


CTRl.CF 


002222 


G 


DRADRT 


002200 G 


ER0401 


006 720 


G 


IDU 


• 000040 G 


t.SEXPl 


002046 


t; 


C$AU = 


000052 




DROP 


124 34 


ER93Q1 


007176 


G 


1ER 


> 020000 G 


LSEXP4 


002064 


U 



SEQ 124 
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SEQ 125 



L$tXPS 

L SHARD 

LSHlME 

L*HPCP 

L*HPTP 

L$HW 

L$ICP 

L*INIT 

L$LADP 

LJLAST 

L$L0AD 

LSl.UN 

L$MREV 

LSNAME 

L$PRI0 

L$PR0T 

l.SPRT 

L$REPP 

L$REV 

LiRPT 

L*SOFT 

L$5PC 

LSSPCP 

L5SPTP 

L$STA 

L$SW 

LATEST 

LiTIML 

LSUNIT 

L 10000 

L 10001 

L 10002 

L 10003 

L 10004 

L 10005 

L 10006 

L 10007 

L10010 

I 10012 

L10013 

L10014 

L10O15 

L 10016 

. ABS. 



002066 
017702 
002120 
002016 
002022 
002152 
002104 
011566 
002026 
020400 
002100 
002074 
002050 
002000 
002042 
011560 
002112 
002062 
002010 
011552 
020076 
002056 
002020 
002024 
002030 
002162 
002114 
002014 
002012 
002160 
002166 
006314 
006566 
006660 
006716 
007174 
007366 
011556 
012366 
012370 
012406 
012516 
012524 



L 1001 7 

L 10020 

L 10021 

L 10022 

L 10023 

L 10024 

L 10025 

L 10026 

L10027 

L 10030 

L10031 

L 10032 

MAPLNS' 

ME UNIT 

MMENAB 

MMPRES 

MMSRO 

MSG1 

MSG2 

MSG3 

MSLCNT 

MSLGET 

MSLOOP 

MSTICK 

NDERPT 

NEWPAS 

NE WIRES 

NEWSTA 

Ni^LNS- 

OOPS 

OPTION 

0iAPTS ; 

0$AU » 

05BGNR' 

0IBGN5' 

OIDU 

OIERRT- 

0$GNSW' 

0*P0IN< 

OiSETU 

PASCNT 

PCSLOT' 



013006 

013542 

014276 

014746 

015416 

016066 

016536 

017166 

017616 

017676 

017736 

020126 

177777 G 

004601 

002306 

002304 

002302 

006316 

006374 

006453 

002300 

010202 

010316 

002276 

002164 

012150 

012142 

011632 

00O020 

010332 

002162 

000000 

000000 

000001 

000001 

000001 

OOOOOl 

000001 

OOOOOl 

000000 

002236 

000016 



PNT 

PREGRT 

PREG05 

PRI 

PRIOO ■ 

PRI01 - 

PRI02 - 

PRX03 » 

PR 104 - 

PR 105 - 

PRI06 - 

PRI07 ■ 

PUKIFO 

RBUEA 

RBUFO » 

RESETT 

RXBDTX- 

RXBETX- 

RXBFUL- 

RXINTC 

RXINTF 

RXTIMO- 

RXTMA 

RXVECA 

ROSLOT- 

R1SL0T- 

R2SL0T- 

R3SL0T- 

R4SL0T- 

R5SL0T- 

SAVBMP 

SAVMST 

SFPTBL 

SKPSTS 

STGTRB 

STSTB 

5TSTE 

SVCGBL- 

SVCINS- 

5VC5UB- 

5VCTAG- 

SVCTST- 



001000 

004042 

004020 

002000 

000000 

000040 

000100 

000140 

000200 

000240 

000300 

000340 

010560 

002202 

000002 

010642 

000030 

000020 

000100 

002240 

002242 

000002 

002202 

002166 

000002 

000004 

000006 

000010 

000012 

000014 

010754 

011022 

002162 

011066 

003770 

002610 G 

002650 G 

000000 

OOOOOl 

OOOOOl 

OOOOOl 

OOOOOl 



SWPTQ1 


020126 




SWPTQ2 


020202 




SWPTQ3 


020235 




3*LSYM- 


010000 




TIMER 1 


002266 


G 


TIMER2 


002270 


G 


TIMEP3 


002272 


G 


TNUM - 


000012 


c; 


TP4FLG 


002252 


G 


TP4RTN 


011530 


G 


TP4VEC 


002250 


G 


TSTNUM 


002226 


G 


TXA01A 


002212 


G 


TXA010- 


000012 


G 


TXA02A 


002214 


G 


TXAD20" 


000014 


G 


TXBFCA 


002216 


G 


TXBFCO- 


000016 


G 


TXINTC 


002244 


G 


TXINTF 


002246 


G 


TXRLNB 


003750 


G 


TXRLNE 


003770 


G 


TXRXLB 


003710 


G 


TXRXLE 


003750 


G 


TXVECA 


0C21 7 


G 


TiARGC- 


• 000C02 




T$COOE' 


001052 




T$ERRN' 


• 022125 




T$EXCP' 


■ 000000 




TIFLAG- 


■ 000050 




TIGMAN' 


■ 000000 




T$HILI« 


• 177777 




T$LAST« 


' OOOOOl 




TiLOLI- 


• 000000 




TiLStM- 


■ 010000 




T$LTNO' 


• 000012 




TINEST- 


■ 177777 




T*NSO i 


' 000000 




T$NS1 - 


■ 000005 




T$PTNU« 


• 000000 




T$SAVL- 


■ 1777/7 




USEtiL- 


- 177777 





TiSUBN 
T*TAGL 
TiTAGN 
T$TEMP 

T$TEST 

T$TSTM 

t*tsts 

T$$AU 

THAUT 

T$$CLE 

THDU 

T$*HAR 

T»$HW 

TMINI 

TIIMSG 

T$iPRO 

T$$RPT 

TUSOF 

T$$SU 

T»$TES 

Tl 

T10 

T2 

T3 

T4 

T5 

T6 

T7 

T8 

T9 

UAM 

UNITN 

UNSDIV 

UAIBIC 

WAIBIS 

W0RD1 

UTWLNC 

XSALWA- 

XSFALS- 

XJOFFS- 

XJTRUE- 

$PATCH 



000000 
177777 
010033 
000000 
000012 
177777 
OOOOOl 
010016 
010013 
010014 
010015 
010031 
010000 
010012 
010007 
010O11 
010010 
010032 
010001 
010030 
012526 
017620 
013010 
013544 
014300 
014750 
015420 
016070 
016540 
017170 
000200 
002176 
011144 
011300 
011354 
002254 
011430 
000000 
000040 
000400 
000020 
020324 



020400 000 
000000 001 
ERRORS DETECTED: 

VIRTUAL MEMORY USED: 28661 WORDS ( 112 PAGES) 
DYNAMIC MEMORY: 20060 WORDS ( 77 PAGES) 
ELAPSED TIME: 00:02:41 
CZDHWB0.BIN,CZDHWB0*LST/-SP*SVC34R/ML,CZDHWBQ.P11 



PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 



DOCUMENT 
HOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 
DOCUMENT 



PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRM1 DOCUMENT 
PROGR/Y1 DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGRAM DOCUMENT 
PROGR*1 DOCUMENT 
PROGRAM DOCUMENT 
PROGR/Y1 HEADER 
PROGRAM HEADER 
DISPATCH TABLE 



DISPATCH T^BLE 
OEFALLT HARDWARE P-T 
SOFTWARE P-TABLE 
GLOBAL EQUATES SECTI 
GLOBAL EQUATES SECTI 
GLOBAL DATA SECTION 
GLOBAL DATA SECTION 
GLOBAL DATA SECTION 
GPR HANDLING ROUTINE 
GPR FRAME ACCESS EQU 
GLOBAL MACRO DEFINIT 
GLOBAL MACRO DEFINIT 
GLOBAL SUBROUTINE 



. .Bl 
. .CI 
. .Dl 
..El 
..Fi 
>.G1 
, ,H1 
..II 
. ,J1 
..Kl 
..LI 
..Ml 
.,N1 



..B2 
.,C2 
..02 
..E2 
..F2 
..G2 

..12 
..J2 
..K2 
♦ .L2 
..M2 
..N2 



.B3 
.C3 
.03 
.E3 
.F3 
.G3 
.H3 
.13 
.J3 
K3 
.L3 
.M3 
.N3 



GLOBAL TEXT SECTION B4 

GLCdAL TEXT SECTION ....C4 

GLOBAL TEXT SECTION 04 

GLOBAL TEXT SECTION . ...E4 
GLOBAL ERROR REPORTI . . . . F4 

GLOBAL ERROR REPORTI G4 

GLOBAL ERROR REPORTI .... H4 

GLOBAL ERROR REPORTI 14 

GL08AL ERROR REPORTI. .. .J4 

GLOBAL ERROR REPORTI K4 

GLOBAL ERROR REPORTI L4 

GLOBAL ERROR REPORTI. .. .M4 
GLOBAL ERROR REPORTI, ...N4 



GLOBAL 


SUBROUTINES S. 


...B5 


GLOBAL 


SUBROUTINE 


...C5 


GLOBAL 


SUBROUTINE 


...05 


GLOBAL 


SUBROUTINE 


...E5 


GLOBAL 


SUBROUTINE 


...F5 


GLOBAL 


SUBROUTINE 


>..G5 


GLOBAL 


SUBROUTINE 


...H5 


GLOBAL 


SUBROUTINE 


...15 


GLOBAL 


SUBROUTINE 


. ..J5 


GLOBAL 


SUBROUTINE 


. ..K5 


GLOBAL 


SUBROUTINE 


. ..L5 


GLOBAL 


SUBROUTINE 


...M5 


GLOBAL 


SUBROUTINE 


...N5 


GLOBAL 


SUBROUTINE 


. ..B6 


GLOBAL 


SUBROUTINE 


...C6 


GLOBAL 


SUBROUTINE 


...06 


GLOBAL 


SUBROUTINE 


...E6 


GLOBAL 


SUBROUTINE 


...F6 


GLOBAL 


SUBROUTINE 


...G6 


GLOBAL 


SUBROUTINE 


...H6 


GLOBAL 


SUBROUTINE 


...16 


GLOBAL 


SUBROUTINE 


. . . <Jo 


GLOBAL 


SUBROUTINE 


. . . !<6 


GLOBAL 


SUBROUTINE 


. ..L6 


GLOBAL 


SUBROUTINE 


...M6 


GLOBAL 


SUBROUTINE 


.. N6 


GLOBAL 


SUBROUTINE 


. . ,B7 


INTERRUPT SERVICE RO. 


.. .C7 


GLOBAL 


TRA» SERVICE , 


..07 


GLOBAL 


TRAP SERVICE . 


...F.7 


PROTECTION TABLE 


...F7 


PROTECTION TABLE 


...G7 


INITIALIZE SECTION . 


...M7 


INITIALIZE SECTION . 


.,.17 


INITIALIZE SECTION . 


,..J7 


INITIALIZE SECTION . 


,..K7 


AUTOOROP SECTION 


...L7 


CLEANUP COOING SECTI. 


...M7 


DROP UNIT SECTION 


...N7 


HAROWARE TEST 


...Bd 


HARDWARE TEST 


,..C8 


HARDWARE TEST 


...08 


HARDWARE TEST 


...E8 


HAROWARE TEST 


.. .F8 


HAROWARE TEST 


...G8 


HARDWARE TEST 


, » , H8 


HARDWARE TEST 


...IB 


HARDWARE TEST 


...J8 


HARDWARE TEST 


...K8 


HARDWARE TEST 


...L8 


HAROWARE TEST 


...M6 


HARDWARE TEST 


,»*N8 



HAROWARE 


TEST 


...B9 


HARDWARE 


TEST 


...C9 


HAROWARE 


TEST 


...09 


HARDWARE 


TEST 


...E9 


HARDWARE 


TEST 


...F9 


HARDWARE 


TEST 


...G9 


HARDWARE 


TEST 


...H9 


HARDWARE 


TEST 


. . ,19 


HARDWARE 


TEST 


...J9 


HAHDWAME 


TEST 


...K9 


HARDWARE 


TEST 


...L9 


HARDWARE 


TEST 


. ..M9 


HAROWARE 


TEST 


♦ ..N9 


HARDWARE 


TEST 


...BIO 


HAROWARE 


TEST 


...CiO 


HARDWARE 


PARAMETER C. 


...010 


HARDWARE 


PARAMETER C. 


...E10 


SOFTWARE 


PARAMETER C. 


...F10 


SOFTWARE 


PARAMETER C. 


...G10 


SYMBOL TABLE 


. . .H10 


SYMBOL TABLE 


...110 



